Try this; ask questions:
#! perl -slw use strict; sub readfile { local $/; ## enable slurp mode +; my @lines = map{ split ',', } split "\n", <>; ## split file by lin +es, then lines on commas. return @lines; } my @lines = readfile(); print for @lines; __END__ C:\test>1158919 junk.dat Cech Bellerin Per Koscielny Nacho Ramsey Coquelin Alexis Ozil Welbeck Giroud
In reply to Re: Reading File Into Array
by BrowserUk
in thread Reading File Into Array
by Irishboy24
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |