I don't see anywhere where you are setting $_. If (as it appears) $_ is undef, then it won't match your regex and the while loop won't ever execute..
See the Copyright notice on my home node.
"The first rule of Perl club is you do not talk about Perl club." -- Chip Salzenberg
In reply to Re: Reading a array
by davorg
in thread Reading a array
by rsriram
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |