in reply to Quick dictionary.com definition
Mommy, what does $this mean?;D
orperl -MNet::Dict -le"for(@{Net::Dict->new(q{dict.org})->define(shift)} +){print qq,@{$_},,q,Do you want another definition?,;$_=<STDIN>;die u +nless /y/i;}" word
perl -MNet::Dict -le"for(@ARGV){print@{$_}for@{Net::Dict->new(q,dict.o +rg,)->define($_)}}"
______crazyinsomniac_____________________________ Of all the things I've lost, I miss my mind the most. perl -e "$q=$_;map({chr unpack qq;H*;,$_}split(q;;,q*H*));print;$q/$q;" |
In Section
Cool Uses for Perl