|
Here you go!!! njoY!!!
theeven
simply open file >
store each line of file in an array >
split each lines in fields >
print >
$file='./file.txt';
open(INFO,$file);
@lines=<INFO>;
close(INFO);
foreach $line (@lines)
{
@field=split(/ /,$line);
print "$field[1]\n";
}
theeven
|