#!perl -p s/$/ =/;for$p(2..21){($i=int$_**(1/$p)+.5)**$p-$_||s// $i^$p/}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page