Select Code to Download

  # a negative number indicates how many chars you just matched
  a -> p -> p -> l -> e -> -5 
...
    -> l -> o -> s -> s -> o -> m -> -7
              -> u -> s -> e -> -6
  u -> s -> e -> -3

#!/usr/bin/perl -w
use strict;
...
bar
bee
beetle