Re: Read a single line in a file.

[Tom Allison]

Hi,

Use the script below:

open(FILE, $file_name);
my ($first, $second, $third, $fourth) = split /,/, <FILE>;
close FILE;

print $third;

Teddy

my ($word) = (split /,/, <FILE>)[2];

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>