diff options
author | 2017-02-05 00:31:51 +0000 | |
---|---|---|
committer | 2017-02-05 00:31:51 +0000 | |
commit | b8851fcc53cbe24fd20b090f26dd149e353f6174 (patch) | |
tree | 4b7c1695865f00ab7a0da30b5632d514848ea3a2 /gnu/usr.bin/perl/ext/VMS-Filespec/t/filespec.t | |
parent | Add option PCIVERBOSE. (diff) | |
download | wireguard-openbsd-b8851fcc53cbe24fd20b090f26dd149e353f6174.tar.xz wireguard-openbsd-b8851fcc53cbe24fd20b090f26dd149e353f6174.zip |
Fix merge issues, remove excess files - match perl-5.24.1 dist
Diffstat (limited to 'gnu/usr.bin/perl/ext/VMS-Filespec/t/filespec.t')
-rw-r--r-- | gnu/usr.bin/perl/ext/VMS-Filespec/t/filespec.t | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/gnu/usr.bin/perl/ext/VMS-Filespec/t/filespec.t b/gnu/usr.bin/perl/ext/VMS-Filespec/t/filespec.t index c14ce99c8a5..6d421e1ad92 100644 --- a/gnu/usr.bin/perl/ext/VMS-Filespec/t/filespec.t +++ b/gnu/usr.bin/perl/ext/VMS-Filespec/t/filespec.t @@ -34,6 +34,8 @@ foreach $test (@tests) { ($arg,$func,$expect2,$expect5) = split(/(?<!\\)\s+/,$test); $arg =~ s/\\//g; # to get whitespace into the argument escape with \ + $expect2 =~ s/\\//g; + $expect5 =~ s/\\//g; $expect2 = undef if $expect2 eq 'undef'; $expect2 = undef if $expect2 eq '^'; $expect5 = undef if $expect5 eq 'undef'; @@ -106,6 +108,9 @@ __some_:<__where_.__over_>__the_.__rainbow_ unixify /__some_/__where_/__over_ [...] unixify .../ ^ __lyrics_:[__are_.__very_^.__sappy_]__but_^.__rhymes_^.__are_.__true_ unixify /__lyrics_/__are_/__very_.__sappy_/__but_.__rhymes_.__are_.__true_ ^ [.$(macro)] unixify $(macro)/ ^ +^+foo.tmp unixify +foo.tmp ^ +[-.foo^_^_bar] unixify ../foo\ \ bar/ ^ +[]foo.tmp unixify ./foo.tmp ^ # and back again /__some_/__where_/__over_/__the_.__rainbow_ vmsify __some_:[__where_.__over_]__the_.__rainbow_ ^ @@ -129,6 +134,10 @@ __some_/__where_/... vmsify [.__some_.__where_...] ^ ./$(m+ vmsify []$^(m^+ ^ foo-bar-0^.01/ vmsify [.foo-bar-0_01] [.foo-bar-0^.01] \ foo.tmp vmsify ^_foo.tmp ^ ++foo.tmp vmsify ^+foo.tmp ^ +../foo\ \ bar/ vmsify [-.foo^_^_bar] ^ +./foo.tmp vmsify []foo.tmp ^ + # Fileifying directory specs __down_:[__the_.__garden_.__path_] fileify __down_:[__the_.__garden_]__path_.dir;1 ^ [.__down_.__the_.__garden_.__path_] fileify [.__down_.__the_.__garden_]__path_.dir;1 ^ |