All the Perl that's Practical to Extract and Report
lynx -dump http://www.european-go.org/rating/alluk.html | perl -lane '$x=(2100-$F[5])/100; print "$F[2] $F[1] ($F[4]) European grade: " .($x>0?"${x}k":(1-$x)."d") if $F[3] eq "Oxf";'
