my @sort;
$sort[$_->[2]] = $_ for @masterArray;

my @top = map {delete $sort[-1]} 1..3;

say Dumper \@top;