Select Code to Download

 $singular_noun            # scalar

...
 $singular_noun{specific}  # hash, element

 sub verb{ ... }           # subroutine

my $pb    = HTML::TokeParser->new(\$content);
my $regex = '^\d+$';
...
  $foo = $tb;
  last LABEL if $tb =~ /$regex/;
}