On Tue, 2 Jan 2001, Peter Corlett wrote:
> On Sat, Dec 30, 2000 at 06:35:18PM +0000, Tony Bowden wrote:
> > i.e. something akin to: my @sort = sort keys map { $_ => 1 } @list;
>
> I'm thinking that this might work:
>
> my @sort=sort keys %{ +{ map { $_ => undef } @list } };
Maybe I'm missing something here, but how is this different to
my @sort = sort @list;
?
S.
--
Shevek
I am the Borg.
sub AUTOLOAD { ($s=$AUTOLOAD)=~s/.*:://; eval qq{ *$AUTOLOAD=$s
?sub {$s*&{$s-1}} :sub {1}; }; goto &$AUTOLOAD; } print &{'4'};