1N/ACheck strict refs functionality
1N/A# no strict, should build & run ok.
1N/A# strict refs - error
1N/ACan't use string ("fred") as a SCALAR ref while "strict refs" in use at - line 5.
1N/A# strict refs - error
1N/ACan't use string ("fred") as a SCALAR ref while "strict refs" in use at - line 5.
1N/A# strict refs - error
1N/ACan't use string ("fred") as a SCALAR ref while "strict refs" in use at - line 6.
1N/A# strict refs - error
1N/ACan't use an undefined value as a SCALAR reference at - line 5.
1N/A# strict refs - error
1N/ACan't use an undefined value as an ARRAY reference at - line 5.
1N/A# strict refs - error
1N/ACan't use an undefined value as a HASH reference at - line 5.
1N/A# strict refs - error
1N/ACan't use an undefined value as a symbol reference at - line 5.
1N/A# strict refs - error
1N/ACan't use bareword ("fred") as an ARRAY ref while "strict refs" in use at - line 4.
1N/A# strict refs - error
1N/Amy $a = fred->{barney} ;
1N/ACan't use bareword ("fred") as a HASH ref while "strict refs" in use at - line 4.
1N/A# strict refs - no error
1N/A# strict refs - no error
1N/Ause strict qw(subs vars) ;
1N/A# strict refs - no error
1N/A# strict refs - no error
1N/A# Check runtime scope of strict refs pragma
1N/ACan't use string ("fred") as a SCALAR ref while "strict refs" in use at - line 10.
1N/A# Check runtime scope of strict refs pragma
1N/ACan't use string ("fred") as a SCALAR ref while "strict refs" in use at - line 8.
1N/A# Check runtime scope of strict refs pragma
1N/A $a = sub { my $c = $$b ; }
1N/ACan't use string ("fred") as a SCALAR ref while "strict refs" in use at - line 8.
1N/ACan't use string ("Fred") as a SCALAR ref while "strict refs" in use at ./abc line 2.
1N/ACompilation failed in require at - line 2.
1N/ACan't use string ("Fred") as a SCALAR ref while "strict refs" in use at
abc.pm line 2.
1N/ACompilation failed in require at - line 2.
1N/ABEGIN failed--compilation aborted at - line 2.
1N/A# Check scope of pragma with eval
1N/A# Check scope of pragma with eval
1N/ACan't use string ("Fred") as a SCALAR ref while "strict refs" in use at - line 6.
1N/A# Check scope of pragma with eval
1N/ACan't use string ("Fred") as a SCALAR ref while "strict refs" in use at - line 5.
1N/A# Check scope of pragma with eval
1N/ACan't use string ("Fred") as a SCALAR ref while "strict refs" in use at - line 9.
1N/A# Check scope of pragma with eval
1N/A# Check scope of pragma with eval
1N/ACan't use string ("Fred") as a SCALAR ref while "strict refs" in use at (eval 1) line 3.
1N/A# Check scope of pragma with eval
1N/ACan't use string ("Fred") as a SCALAR ref while "strict refs" in use at (eval 1) line 2.
1N/A# Check scope of pragma with eval
1N/ACan't use string ("Fred") as a SCALAR ref while "strict refs" in use at - line 8.
1N/A# [perl #26910] hints not propagated into (?{...})
1N/ACan't use string ("foo") as a SCALAR ref while "strict refs" in use at (re_eval 1) line 1.