This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Deparse glob the same way regardless of PERL_EXTERNAL_GLOB
[perl5.git] / dist / B-Deparse / t / deparse.t
index 4948773..b1bd1e2 100644 (file)
@@ -721,7 +721,7 @@ tr/a/b/r;
 tr/\x{345}/\x{370}/;
 ####
 # [perl #90898]
-glob('a,');
+<a,>;
 ####
 # [perl #91008]
 each $@;