Kann mir jemand vieleicht weiterhelfen und zwar mir sagen warum das hier eine endlosschleife ergibt:
Das hat Dir Vinzenz schon gesagt, aber warum machst Du es so umständlich? Kürzer und eleganter geht's ab Perl 5.6.0 wie folgt:
while(<*.{jpg,gif,jpeg}>) {
print $_, "\n";
}
In $_ steht die aktuell gefundene Datei, damit kannst Du dann Deinen Hash füllen.
Siechfred
--
Wir vom Moderatorenteam haben keinerlei Humor, von dem wir wüssten.
Wir vom Moderatorenteam haben keinerlei Humor, von dem wir wüssten.