$ perl -MLWP::Simple -e " getprint( shift ) " http://foo.bar.baz 500 Can't connect to foo.bar.baz:80 (Bad hostname)