This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Test nit.
[perl5.git] / t / pragma / warn / pp_sys
index 88c3542..2843c70 100644 (file)
@@ -397,4 +397,4 @@ my $a = sysread(F, $a,10) ;
 close F ;
 unlink $file ;
 EXPECT
-Filehandle F opened only for output at - line 5.
+Filehandle F opened only for output at - line 12.