Public ScratchpadDownload, Select Code To D/L

Help for this page

Select Code to Download


  1. or download this
    $_ = "Bilbo Baggins's birthday is September 22";
/(.*)'s birthday is (.*)/;
print "Person: $1\n";
print "Date: $2\n";
  2. or download this
    sub new {
  my $class = shift;
...

  return $self;
}
  3. or download this
    " autowrapping text
set wrapmargin=10
...
set expandtab
set showmatch
set formatoptions=tcr