Setting cnt to %d, ptr implies %d
-perlio: invalid separator character %c%c%c in layer specification list %s
+Invalid separator character %c%c%c in PerlIO layer specification %s
open(F, ">:-aa", "bb")
-perlio: argument list not closed for layer \"%.*s\""
+Argument list not closed for PerlIO layer \"%.*s\""
open(F, ">:aa(", "bb")
-perlio: unknown layer \"%.*s\"
+Unknown PerlIO layer \"%.*s\"
# PerlIO/xyz.pm has 1;
open(F, ">xyz", "bb")
open(F, ">:-aa", "bb");
close F;
EXPECT
-perlio: invalid separator character '-' in layer specification list -aa at - line 6.
+Invalid separator character '-' in PerlIO layer specification -aa at - line 6.
########
# perlio [PerlIO_parse_layers]
open(F, ">:aa(", "bb");
close F;
EXPECT
-perlio: argument list not closed for layer "aa(" at - line 6.
+Argument list not closed for PerlIO layer "aa(" at - line 6.
########
--FILE-- PerlIO/xyz.pm
close F;
END { 1 while unlink "bb" } # KEEP THIS WITH THE LAST TEST.
EXPECT
-perlio: unknown layer "xyz".
+Unknown PerlIO layer "xyz" at - line 5.