http://www.perlmonks.org?node_id=1227828

Run on a VT100 compatible terminal
#!/usr/bin/perl BEGIN{$^="USE\0cOMPRESS\x1a\x1azLIB"^" ",$^=~s,$, $^,ee};$_=q|M'XL(`*[Q*%P"`Y5231J%(`C<=PJ.VJ)E"U?T\\ZSNYDD>(B)HF_P^R V9@A!A(MN"5<0!=]P[@831@,-!4@,\\(N"1%8[U%)BV[Y-,:12L?1&S.C5]A]F4+RES `)M=WN*$C4R#/YH[YT\\/>:$IY/?&(M#&>VATA0W9VBE7T-U<2LWU%.$ALFQ=J"\\M= ICPR"76N)ZYZS7P<7U/*.ZP!N$BHG,%-BZ,`E+WV@_7_N90.FH18I'@K*69M(LSP4X; :C=:)EP[H@MXNEWIO?[&'U@_#@,?:O54D([YD6E$_3F^+*NOL<Q1+4Y0[.M_SP=<;<Y O0'IR@8@`4$|;y| \n||d;$_=unpack'u';$,='-V4Jfdy{lzz33Se`k33dldN|gs'. '`y!-V 2y{`g}2';$,^="\t"x$,=~y,,,c;$,=~s;^;$,;ee;