END{FS=9;$0="9 99333390999"(a=1000" "10009)a"999099\n9test.pl99 \n-9910009609100090990995.0140029STDOUT_TOP9999099STDOUT";for(i=33;35>j+=i%50>7;i+=i%32?1:27)printf"$%c="$j RS,i}