as taint said is a LWP task and many times an LWP::Simple one.

Many times this tasks can be hacked in quasi-oneliner,as in:

perl -e "use LWP::Simple; my $word = $ARGV[0];map { print qq($_ ) if /
+<h2.*$word<\/h2>/../Link/  } split /\n/, get('http://dictionary.refer
+ence.com/browse/'.$word);"
[download]

The final get (imported by LWP::Simple) get the doc that is splitted and, if flip-flop is on, map do the print.

L*