Splitten ohne Zeichen?

[Tom]

Hi Calocybe,

also ich hab das jetzt mal so probiert (hoffentlich hab ich das richtig verstanden):

open(ID,"$root/dat/$Q{'id'}.txt");  
$countvalue = <ID>;  
close(ID);  
push(@chars,$countvalue) while($countvalue =~ s/^.//);  
print "Content-type: text/html\n\n";  
foreach $line (@chars){  

print "$line<br><br>\n";
}

in der Datei, die ausgelesen wird, steht z.B. der Wert "12345". Mit dem obenstehenden Code wird folgendes ausgegeben:

---

2345

345

45

5

---

keine Ahnung, ob das an mir liegt, oder es einfach nicht der richtige Code für so eine Anwendung ist...

danke & viele Grüße
Tom