or download this
$s = do{ $£ .= chr for 0..255; $£ };
...
print $s;
!*,-.0123456789:?ABCDEFGHIJKLMNOPQRSTUVWXYZ_abcdefghijklmnopqrstuvwxy
+z
ÇüéâäàåçêëèïîìÄÅÃâ
+€°ÃƒÂ¦Ãƒâ€ ôöòûùÿÖÜ¢£¥₧ƒÃ
+ƒÂ¡ÃƒÂóúñÑ