my @sorted_referrers =
    map { $_->[1] }
    sort { $a->[0] cmp $b->[0] },
    map { [ (split("|"))[2], $_ ] } @referrers;