in reply to Re: reading a log file and sorting by last name
in thread reading a log file and sorting by last name

my( $fname, $lname, $grades ) = /^(.*?) (\S*?) ([ 0-9]*)$/;

Also:

my ($fname, $lname, $grades) = split /\s+/, $_, 3;

--
David Serrano

In Section Seekers of Perl Wisdom