Select Code to Download

(split/[^\w_]/,pop)[4]
1234567890123456789001

perl -e'\ 
\ 
\ 
\ 
goto TPC'

map{chr(hex)}unpack("A2"x11,pop)
1234567890123456789012345678901

$x=shift;map{$x=$_ if$_<$x}@_;$x
12345678901234567890123456789012

sort{($a=~/([aeoui])/)[0]cmp($b=~/([aeiou])/)[0]}@_}
1234567890123456789012345678901234567890123456890123