Skip to content

Instantly share code, notes, and snippets.

@Whateverable

Whateverable/query

Created April 15, 2019 22:10
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 Whateverable/6cc4b0ede88399a1231333865602275a to your computer and use it in GitHub Desktop.
Save Whateverable/6cc4b0ede88399a1231333865602275a to your computer and use it in GitHub Desktop.
Download ZIP
evalable6
Raw
query
my $a = False; sub a-or-b { $a ?? /^ 'a'/ !! /^ 'b'/ }; say ('baa' ~~ / <&a-or-b> .. / );
Raw
result
(exit code 1)
Sub object coerced to string (please use .gist or .perl to do that)
in block <unit> at /tmp/IlTjpsyl8a line 1
===SORRY!===
Unrecognized regex metacharacter - (must be quoted to match literally)
at /home/bisectable/git/whateverable/EVAL_0:1
------> anon regex { a⏏-or-b}
Malformed regex
at /home/bisectable/git/whateverable/EVAL_0:1
------> anon regex { a-⏏or-b}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment