Skip to content

Instantly share code, notes, and snippets.

@kraih

kraih/fast-5.16.txt

Last active August 29, 2015 14:04
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save kraih/d98457537a07a46e753f to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save kraih/d98457537a07a46e753f to your computer and use it in GitHub Desktop.
Download ZIP

Revisions

  1. kraih revised this gist Jul 15, 2014. 4 changed files with 0 additions and 18 deletions.
    0 fast3.txt → fast-5.16.txt
    View file
    File renamed without changes.
    0 fast2.txt → fast-5.20.txt
    View file
    File renamed without changes.
    18 changes: 0 additions & 18 deletions fast.txt
    View file
    Original file line number Diff line number Diff line change
    @@ -1,18 +0,0 @@
    $ perl5.20 -Mre=debug -E 'my $x = "y"; "y" =~ /$x/ for 1 .. 2'
    Compiling REx "y"
    Final program:
    1: EXACT <y> (3)
    3: END (0)
    anchored "y" at 0 (checking anchored isall) minlen 1
    Matching REx "y" against "y"
    Intuit: trying to determine minimum start position...
    Found anchored substr "y" at offset 0...
    (multiline anchor test skipped)
    Intuit: Successfully guessed: match at offset 0
    Compiling REx "y"
    Matching REx "y" against "y"
    Intuit: trying to determine minimum start position...
    Found anchored substr "y" at offset 0...
    (multiline anchor test skipped)
    Intuit: Successfully guessed: match at offset 0
    Freeing REx: "y"
    0 slow.txt → slow-5.20.txt
    View file
    File renamed without changes.
  2. kraih revised this gist Jul 15, 2014. 1 changed file with 7 additions and 0 deletions.
    7 changes: 7 additions & 0 deletions fast3.txt
    View file
    Original file line number Diff line number Diff line change
    @@ -0,0 +1,7 @@
    $ perl5.16 -Mre=debug -E 'my $x = "y"; "y" =~ /z$x/ for 1 .. 2'
    Compiling REx "zy"
    Final program:
    1: EXACT <zy> (3)
    3: END (0)
    anchored "zy" at 0 (checking anchored isall) minlen 2
    Freeing REx: "zy"
  3. kraih revised this gist Jul 15, 2014. 3 changed files with 5 additions and 5 deletions.
    2 changes: 1 addition & 1 deletion fast.txt
    View file
    Original file line number Diff line number Diff line change
    @@ -3,7 +3,7 @@ Compiling REx "y"
    Final program:
    1: EXACT <y> (3)
    3: END (0)
    anchored "y" at 0 (checking anchored isall) minlen 1
    anchored "y" at 0 (checking anchored isall) minlen 1
    Matching REx "y" against "y"
    Intuit: trying to determine minimum start position...
    Found anchored substr "y" at offset 0...
    4 changes: 2 additions & 2 deletions fast2.txt
    View file
    Original file line number Diff line number Diff line change
    @@ -1,7 +1,7 @@
    $ perl5.20 -Mre=debug -E 'my $x = "y"; "y" =~ /z$x/o'
    $ perl5.20 -Mre=debug -E 'my $x = "y"; "y" =~ /z$x/o for 1 .. 2'
    Compiling REx "zy"
    Final program:
    1: EXACT <zy> (3)
    3: END (0)
    anchored "zy" at 0 (checking anchored isall) minlen 2
    anchored "zy" at 0 (checking anchored isall) minlen 2
    Freeing REx: "zy"
    4 changes: 2 additions & 2 deletions slow.txt
    View file
    Original file line number Diff line number Diff line change
    @@ -1,8 +1,8 @@
    $ perl5.20 -Mre=debug -E 'my $x = "y"; "y" =~ /z$x/ for 1 .. 2'
    $ perl5.20 -Mre=debug -E 'my $x = "y"; "y" =~ /z$x/ for 1 .. 2'
    Compiling REx "zy"
    Final program:
    1: EXACT <zy> (3)
    3: END (0)
    anchored "zy" at 0 (checking anchored isall) minlen 2
    anchored "zy" at 0 (checking anchored isall) minlen 2
    Compiling REx "zy"
    Freeing REx: "zy"
  4. kraih created this gist Jul 15, 2014.
    18 changes: 18 additions & 0 deletions fast.txt
    View file
    Original file line number Diff line number Diff line change
    @@ -0,0 +1,18 @@
    $ perl5.20 -Mre=debug -E 'my $x = "y"; "y" =~ /$x/ for 1 .. 2'
    Compiling REx "y"
    Final program:
    1: EXACT <y> (3)
    3: END (0)
    anchored "y" at 0 (checking anchored isall) minlen 1
    Matching REx "y" against "y"
    Intuit: trying to determine minimum start position...
    Found anchored substr "y" at offset 0...
    (multiline anchor test skipped)
    Intuit: Successfully guessed: match at offset 0
    Compiling REx "y"
    Matching REx "y" against "y"
    Intuit: trying to determine minimum start position...
    Found anchored substr "y" at offset 0...
    (multiline anchor test skipped)
    Intuit: Successfully guessed: match at offset 0
    Freeing REx: "y"
    7 changes: 7 additions & 0 deletions fast2.txt
    View file
    Original file line number Diff line number Diff line change
    @@ -0,0 +1,7 @@
    $ perl5.20 -Mre=debug -E 'my $x = "y"; "y" =~ /z$x/o'
    Compiling REx "zy"
    Final program:
    1: EXACT <zy> (3)
    3: END (0)
    anchored "zy" at 0 (checking anchored isall) minlen 2
    Freeing REx: "zy"
    8 changes: 8 additions & 0 deletions slow.txt
    View file
    Original file line number Diff line number Diff line change
    @@ -0,0 +1,8 @@
    $ perl5.20 -Mre=debug -E 'my $x = "y"; "y" =~ /z$x/ for 1 .. 2'
    Compiling REx "zy"
    Final program:
    1: EXACT <zy> (3)
    3: END (0)
    anchored "zy" at 0 (checking anchored isall) minlen 2
    Compiling REx "zy"
    Freeing REx: "zy"