Select Code to Download

Town         Surname       Firstname

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

my $data = "clients.dat";
open (DAT, $data) or die "\"$data\" not existed or can't be opened!\n"
+;
...
    print "$client->{'town'} $client->{'surname'} $client->{'firstname
+'}";
    
}