Package: perl-doc
Version: 5.8.8-7
Severity: wishlist
No mention of unique here,
$ perldoc -f sort|grep -ci unique
0
Perhaps add an example of a very common need, emulating Unix sort -u.
Perhaps something like
#Emulate Unix sort|uniq i.e., sort -u
for (@v) { $n{$_} = 1 }
@v = sort keys %n;
undef %n;
or longer example:
#Emulate Unix sort|uniq i.e., sort -u
my @v = ( 1, 8, 2, 3, 3, 4 );
my %n;
for (@v) { $n{$_} = 1 }
@v = sort keys %n;
undef %n;
print join ",", sort @v;
print "\n";
#prints 1,2,3,4,8
But how should I know, as I am a perl amateur.
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
