Opened by Gast at 2004-08-03 17:13
User since
2004-05-11
14 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2004-05-11
14 Artikel
BenutzerIn
[quote=Dubu,04.08.2004, 15:31]
Aufruf mit programmname eingabe.dat. Es werden die Dateien gerade und ungerade erzeugt.[/quote]
Hallo Dubu,
das klappt bei mir so leider nicht, die Datei, die zeilenweise ausgelesen werden soll, öffne ich mit
open FILE, "gzip -cdfq $data"
Danach habe ich dann, wie von Dir beschrieben, die beiden Dateien geöffnet, diese bleiben danach aber leer. Was könnte ich da denn noch falsch gemacht haben. Ansonsten ist es wohl genau das was ich auch suche.
MfG
Tim
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
#!/usr/bin/perl
use strict;
use warnings;
open my $u, ">ungerade" or die $!;
open my $g, ">gerade" or die $!;
while (<>) {
print { $|-- ? $g : $u } $_;
}
Aufruf mit programmname eingabe.dat. Es werden die Dateien gerade und ungerade erzeugt.[/quote]
Hallo Dubu,
das klappt bei mir so leider nicht, die Datei, die zeilenweise ausgelesen werden soll, öffne ich mit
open FILE, "gzip -cdfq $data"
Danach habe ich dann, wie von Dir beschrieben, die beiden Dateien geöffnet, diese bleiben danach aber leer. Was könnte ich da denn noch falsch gemacht haben. Ansonsten ist es wohl genau das was ich auch suche.
MfG
Tim