Opened by PETer at 2012-07-27 10:12
User since
2005-01-17
14806 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2005-01-17
14806 Artikel
Admin1
Beispiel:
Wenn du aus einer externen Datei einliest, musst du dann halt anstatt DATA dein Dateihandle nehmen ;)
Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12
local $/ = undef; # Datensatztrenner für Eingabe löschen my $data_line = <DATA>; # liest komplett die Daten aus dem Abschnitt __DATA__ (siehe unten!) in Variable my @data = split /[\n\s]/, $data_line; # Zahlen extrahieren print "Zahlen sind: ", join "\n",@data; # Zum Test wieder ausgeben __DATA__ 123 4567 901 234 567 9876 7865 7816 12211 12212 12992
Wenn du aus einer externen Datei einliest, musst du dann halt anstatt DATA dein Dateihandle nehmen ;)