perl -MLWP::Simple -e 'print @{[head("http://www.perlmonks.org/")]}[2] . "\n"'