1N/A# nolint: check compile time $^W is zapped
1N/Aclose STDIN ; print STDIN "abc" ;
1N/A# nolint: check runtime $^W is zapped
1N/Aclose STDIN ; print STDIN "abc" ;
1N/A# nolint: check runtime $^W is zapped
1N/A close STDIN ; print STDIN "abc" ;
1N/A# nolint: check "no warnings" is zapped
1N/Aclose STDIN ; print STDIN "abc" ;
1N/A# nolint: check "no warnings" is zapped
1N/A close STDIN ; print STDIN "abc" ;
1N/A# nolint: check combination of -w and -X
1N/A close STDIN ; print STDIN "abc" ;
1N/Ause warnings 'syntax' ;
1N/Ause warnings 'uninitialized' ;
1N/Ause warnings 'syntax' ;
1N/Ause warnings 'uninitialized' ;
1N/A# Check scope of pragma with eval
1N/A '; print STDERR $@ ;
1N/A# Check scope of pragma with eval
1N/A use warnings 'uninitialized' ;
1N/A# Check scope of pragma with eval
1N/A use warnings 'uninitialized' ;
1N/A '; print STDERR $@ ;
1N/A# Check scope of pragma with eval
1N/A use warnings 'uninitialized' ;
1N/A '; print STDERR $@ ;
1N/A# Check scope of pragma with eval
1N/A '; print STDERR $@ ;
1N/A# Check scope of pragma with eval
1N/A use warnings 'syntax' ;
1N/A# Check scope of pragma with eval
1N/A use warnings 'syntax' ;
1N/A# Check scope of pragma with eval
1N/A use warnings 'syntax' ;