Re: [PERL] not eq

[Peter Makholm <sslug@sslug>]

Ole Tange <sslug@sslug> writes:

> for (@a) { $is_dup{$_}++ and do { push @dub, $_ }; }
>
> Dette giver 2 aber i @dub.

Så kunne man jo skrive:

for (@a) { $is_dup{$_}++ == 1 and do { push @dub, $_ }; }

Hvilket er en mindre ændirng end din ekstra hash.

-- 
 Peter Makholm     |       Why does the entertainment industry wants us to
 sslug@sslug |      believe that a society base on full surveillance
 http://hacking.dk |                                               is bad?
                   |                       Do they have something to hide?