open (IF, "<$thefile"); $rawstring = (<IF>); close (IF); while (length($rawstring) > 0) { ($item, $rawstring) =~ split/\;/,$rawstring; print "$item\n"; }
In reply to Split long string MANY times? by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |