All the Perl that's Practical to Extract and Report
$ perl -Mbigint -le'print+(1x9)**2' 12345678987654321
(It was written on the sugar bag this morning, except that it was not in Perl, and much less interesting of course.)
