Help for this page

Select Code to Download


  1. or download this
    (split/[^\w_]/,pop)[4]
1234567890123456789001
  2. or download this
    perl -e'\ 
\ 
\ 
\ 
goto TPC'
  3. or download this
    map{chr(hex)}unpack("A2"x11,pop)
1234567890123456789012345678901
  4. or download this
    $x=shift;map{$x=$_ if$_<$x}@_;$x
12345678901234567890123456789012
  5. or download this
    sort{($a=~/([aeoui])/)[0]cmp($b=~/([aeiou])/)[0]}@_}
1234567890123456789012345678901234567890123456890123