//,print"@{[map{my$s;$==$';0while$s=(0..9,a..v)[$=%$_].$s,$=/=$_;$s}2..$']} "for 2..63