Select Code to Download

Town         Surname       Firstname

...
Montmarte    Sarte         Jean Paul  
Montmarte    Rodin         Paul 
Amsterdam    Rikard        Frank

    my @elems = $key;
    my $client = $client->[$elems[1]-1];

use Data::Dumper;
my @a = (2, 5, 7);
print Dumper \@a;

$VAR1 = [
          2,
          5,
          7
        ];