Skip to content

Instantly share code, notes, and snippets.

@Whateverable
Created October 31, 2018 03:22
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/b4117c92ca26fd96b29e1f6a6cea2dca to your computer and use it in GitHub Desktop.
Save Whateverable/b4117c92ca26fd96b29e1f6a6cea2dca to your computer and use it in GitHub Desktop.
greppable6
throws-like\s+['"q「]
File Code
sergot/datetime-parse
…/01-basic.t :24:
throws-like qq[ DateTime::Parse.new('$bad') ], X::DateTime::CannotParse, invalid-str => $bad;
sergot/http-useragent
…/070-ua-simple.t :20:
throws-like "use HTTP::UserAgent :simple; get('http://perlmonkeys.org/404here')", X::HTTP::Response, message => "Response error: '404 Not Found'";
sergot/http-useragent
…/090-ua-ssl.t :22:
throws-like 'use HTTP::UserAgent; my $ssl = HTTP::UserAgent.new(:throw-exceptions); $ssl.get("https://httpbin.org/status/403")', X::HTTP::Response, message => "Response error: '403 Forbidden'";
sergot/perl6-encode
…/01-basic.t :8:
throws-like 'Encode::decode("nyi-encoding", buf8.new(97))', X::Encode::Unknown, message => 'Unknown encoding nyi-encoding.';
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment