Skip to content

Instantly share code, notes, and snippets.

@pmichaud

pmichaud/gist:4953406

Created February 14, 2013 15:08
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save pmichaud/4953406 to your computer and use it in GitHub Desktop.
Save pmichaud/4953406 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
pmichaud@kiwi:~/p6/specs$ ack '\~\~ m' S05-regex.pod
if $str ~~ m:overlap/ a (.*) a / {
if $str ~~ m:exhaustive/ a (.*?) a / {
$string ~~ m/^ \d+ $/;
$string ~~ m/^ \d+: $/;
$string ~~ m/^ <.ws> \d+: <.ws> $/;
$text ~~ m/ [ (\w+) \: (\w+ \h*)* \n ] ** 2..* /;
$text ~~ m/ ( (\w+) \: (\w+ \h*)* \n ) ** 2..* /;
"coffee fifo fumble" ~~ m/ $<effs>=[f <-[f]> ** 1..2 \s*]+ /;
if $text ~~ ms:g/ (\S+:) <rocks> / {
if $text ~~ ms:g/ (\S+:) <rocks> / {
$stream ~~ m/pattern/; # match from stream
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment