Select Code to Download

wget -qO - 'http://4q.cc/index.php?pid=fact&person=chuck' |\
perl -lne 'print $1 if ((/<h1>And now a random fact/ ... /<hr/) =~ /^\
+d+(?<!^1)$/ ) and m{<p>(.*)</p>}'

Other than Chuck Norris, everything IS relative.