Perl klausimai

Reikia atlikti vieną užduotį su Perl kalba. Labai man nelimpa šita kalba ir norių patarimų. Užduotis tokia:

Dabar turiu tiek padaręs. Prieš tai bandžiau tiesiog nuskaityti nuo failo, sudėti duomenis į 2 skirtingus masyvus (name and points) bet supratau, kad čia taip turbūt bus neįmanoma. Tada sukūriau žmogaus struktūra ir masyvą tokio tipo. Bėda, kad visiškai nežinau Perl kalbos ir man ji visiškai nelimpa. Gal kas patarimų, kaip iš masyvo tuos duomenis lygint ir ištrinti dublikatus? Bandžiau tai daryti su ciklu cikle, bet kažkaip ten visiškai į pievas darę viską.

use Class::Struct; 
use warnings;
use strict;   

struct Person => {
name => '$',
points => '$'};


my $filename = 'data.txt';
open(my $fh, '<:encoding(UTF-8)', $filename)
or die "Could not open file\n";

my @resultArray;
my @name;
my @name2;
my @grade2;
my @grade;
my @nameArray;
my @gradeArray;

my $person = Person->new();


while (my $row = <$fh>) {
chomp $row;
(@name, @grade) = split("\t", $row);
push(@nameArray, @name);
#($person->name, $person->points) = split("\t", $row);	
#push(@nameArray, @name);

}
foreach(@nameArray) {
my @seperated = split(' ', $_);
$person->name($seperated[0]);
$person->points($seperated[1]);
}

print($person->points);