Re: [FWP] Love & Hate shenanigans

[Sven Neuhaus <sn@neopoly.com>]

>From fwp-l@cfcl.com Wed Mar 28 02:35:34 2001

55. Duh. I shall quit for now. Promised.
perl -lne '$x=$_;($_&$x)=~/$_|$x/&&print"$x $_"for keys%a;$a{$x}=1'

-Sven
-- 
$\=$/,$^X=~m(((.)..l));$~=q,od,,$_='sven@sven.de 2000/01/04'
,$;="/$2$~/$1f\141q".(close STDERR).".$2$~";$#=length,print
map{@ARGV=-f$_.$;?$_.$;:m;();;m>"(j.{$#})>while<>;$+}@INC

==== Want to unsubscribe from Fun With Perl?  Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
====   unsubscribe