Skip to content

Instantly share code, notes, and snippets.

@Tux
Created June 10, 2015 11:32
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 Tux/e85a53243c7bab63858d to your computer and use it in GitHub Desktop.
Save Tux/e85a53243c7bab63858d to your computer and use it in GitHub Desktop.
if (%attr<sep_char> eq %attr<quote_char> ||
%attr<sep_char> eq %attr<escape_char>) {
$Z++;
ok (%state{1001}.defined, "Illegal combo sep == quo || sep == esc");
is (%state{1001}, "INI - separator is equal to quote- or escape sequence", "Illegal combo 1001");
%state{1001} ~~ m{"separator is equal to"} or warn "HELP";
%state{1001} ~~ m{"separator is equal to"} or die $Z, %state{1001};
}
=>
ok 16995 - Illegal combo sep == quo || sep == esc
ok 16996 - Illegal combo 1001
HELP in block at t/55_combi.t:49
ok 16997 - -- "~" "+" "\x[0]" Bool::True Bool::True
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment