Select Code to Download

    sub hole{print "hello, world"}    For a sub 
             123456789_123456789_     20 chars
...
    perl -e 'print "hello, world"'    For a one liner
    123456789_123456789_123456789_    30  chars

Can't find label TPC at -e line 5.

   input       output
  'aaaaaa'     'a'
  'ababab'     'ab'
  'aabaab'     'aab'
  'ababaa'     ''

  5065726c206861636b6572
    ->
  ('P', 'e', 'r', 'l', ' ', 'h', 'a', 'c', 'k', 'e', 'r')

   e.g.:     hole('dog', 'cat', 'fish', 'duck', 'lemur')
   returns:  ('cat', 'lemur', 'fish', 'dog', 'duck')