in reply to Re^2: a way to do 'sort|uniq'
in thread a way to do 'sort|uniq'

@_{@telephones}=(); # %_ hash from @telephones print+ # print the join $/, # joined with "\n" separator sort{ $a <=> $b }keys%_; # list which comes from %_ keys