while bzw. Datei durchsuchen, Hilfe gesucht - #109015 (Allgemeines zu Perl)

styx-cc

2008-04-30 00:37

User since
2006-05-20
533 Artikel
BenutzerIn

user image

Mach mal aus:

Code: (dl )

18: print Dumper @result; #ausgabe

Code: (dl )

1
2
3

for my $cur_res (@result) {
  print join('-', @$cur_res). "\n";
}

ungetestet

Pörl.