Hi Thanks for suggestion. But the problem is that how can i store the ele +ments in an array printed by the following line print "$_\n" for @{ $blocks[0] }; and send them to a sub routine present in another module and when that + module returns 1, then it will stores the elements printed by the fo +llowing line print "$_\n" for @{ $blocks[1] }; and send them to that sub routine present in that particular module an +d when that module returns 1, then it will send the elements printed +by the following line print "$_\n" for @{ $blocks[2] }; and so on. Lastly the program will exit when if there is no ITEM.
In reply to Re^2: How can i read the lines and store them in an array like following fashion?
by sanjay nayak
in thread How can i read the lines and store them in an array like following fashion?
by sanjay nayak
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |