In this line foreach my $line (my @stories){ the my makes a new copy of the array stories that is in effect for the lexical block of the foreach. Of course that new copy is empty rather than having the contents of the file in it. Use foreach my $line (@stories){ instead;
In reply to Re: Parsing a text file
by huck
in thread Parsing a text file
by DARK SCIENTIST
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |