@links is AoA, (Array of Arrays) you can see it with:

use Data::Dumper;
print Dumper(\@links);
[download]

map{$_->[0]} returns a list which consist of first elements of each inner array