3 Einträge, 1 Seite |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
while( my $ziele = <$filehandle> ) { @test = split(/;/, $ziele); $groesse = scalar @test; if ($groesse <5) { print fAUSDATEI "FEHLER\n\n Eine ID hat weniger als 5 Werte!"; } else { print $groesse; $ziele=(); @test=(); open (my $filehandle, "<$solldatei"); open (my $filehandle1, "<$istdatei"); } }
cherished+2008-06-24 10:19:20--Es geth darum, dass wenn in Datei 1 es einmal vorkommen sollte,
Quotedass weniger als 5 Werte drinn sind-> das Programm eine MSG in der Ausgabedatei macht und aufhört.
Quoteps:Tut mir Leid, wenn mein Code nicht der Norm entspricht
[perl]...[/perl]
moritz+2008-06-24 10:28:25--cherished+2008-06-24 10:19:20--Es geth darum, dass wenn in Datei 1 es einmal vorkommen sollte,
Was ist "es"?
Quotedass weniger als 5 Werte drinn sind-> das Programm eine MSG in der Ausgabedatei macht und aufhört.
Das Programm kannst du mit exit() beenden, oder du kannst mit last aus der Schleife ausbrechen.
[perl]...[/perl]
3 Einträge, 1 Seite |