Help for this page

Select Code to Download


  1. or download this
    my @words = (
   'foo',
...
      }
   }
}
  2. or download this
    my @words = (
   'foo',
...
      }
   }
}
  3. or download this
    my @words = (
   'foo',
...
      }
   }
}
  4. or download this
    my @words = (
   'foo',
...
      }
   }
}
  5. or download this
    use Regexp::List ();

...
   print if /$regexp/;
  #print if $_ =~ $regexp;  # Alternate syntax.
}
  6. or download this
    my @patterns = qw(
   create
...
      last;
   }
}