diff options
Diffstat (limited to 't/lib/warnings/2use')
| -rw-r--r-- | t/lib/warnings/2use | 28 |
1 files changed, 14 insertions, 14 deletions
diff --git a/t/lib/warnings/2use b/t/lib/warnings/2use index b700ef70dc..7810287a3a 100644 --- a/t/lib/warnings/2use +++ b/t/lib/warnings/2use @@ -42,7 +42,7 @@ use warnings 'uninitialized' ; } my $b ; chop $b ; EXPECT -Use of uninitialized value in scalar chop at - line 8. +Use of uninitialized value $b in scalar chop at - line 8. ######## # Check runtime scope of pragma @@ -53,7 +53,7 @@ no warnings ; } my $b ; chop $b ; EXPECT -Use of uninitialized value in scalar chop at - line 6. +Use of uninitialized value $b in scalar chop at - line 6. ######## # Check runtime scope of pragma @@ -64,7 +64,7 @@ no warnings ; } &$a ; EXPECT -Use of uninitialized value in scalar chop at - line 6. +Use of uninitialized value $b in scalar chop at - line 6. ######## use warnings 'syntax' ; @@ -103,7 +103,7 @@ require "./abc"; my $a ; chop $a ; EXPECT Reversed += operator at ./abc line 2. -Use of uninitialized value in scalar chop at - line 3. +Use of uninitialized value $a in scalar chop at - line 3. ######## --FILE-- abc.pm @@ -116,7 +116,7 @@ use abc; my $a ; chop $a ; EXPECT Reversed += operator at abc.pm line 2. -Use of uninitialized value in scalar chop at - line 3. +Use of uninitialized value $a in scalar chop at - line 3. ######## # Check scope of pragma with eval @@ -143,7 +143,7 @@ use warnings; my $b ; chop $b ; } EXPECT -Use of uninitialized value in scalar chop at - line 8. +Use of uninitialized value $b in scalar chop at - line 8. ######## # Check scope of pragma with eval @@ -156,8 +156,8 @@ no warnings; my $b ; chop $b ; } EXPECT -Use of uninitialized value in scalar chop at - line 7. -Use of uninitialized value in scalar chop at - line 9. +Use of uninitialized value $b in scalar chop at - line 7. +Use of uninitialized value $b in scalar chop at - line 9. ######## # Check scope of pragma with eval @@ -171,7 +171,7 @@ no warnings; my $b ; chop $b ; } EXPECT -Use of uninitialized value in scalar chop at - line 10. +Use of uninitialized value $b in scalar chop at - line 10. ######## # Check scope of pragma with eval @@ -253,7 +253,7 @@ use warnings; my $b ; chop $b ; } EXPECT -Use of uninitialized value in scalar chop at (eval 1) line 3. +Use of uninitialized value $b in scalar chop at (eval 1) line 3. ######## # Check scope of pragma with eval @@ -266,8 +266,8 @@ no warnings; my $b ; chop $b ; } EXPECT -Use of uninitialized value in scalar chop at (eval 1) line 2. -Use of uninitialized value in scalar chop at - line 9. +Use of uninitialized value $b in scalar chop at (eval 1) line 2. +Use of uninitialized value $b in scalar chop at - line 9. ######## # Check scope of pragma with eval @@ -281,7 +281,7 @@ no warnings; my $b ; chop $b ; } EXPECT -Use of uninitialized value in scalar chop at - line 10. +Use of uninitialized value $b in scalar chop at - line 10. ######## # Check scope of pragma with eval @@ -351,4 +351,4 @@ no warnings 'syntax' ; $a =+ 1 ; EXPECT Reversed += operator at - line 6. -Use of uninitialized value in scalar chop at - line 9. +Use of uninitialized value $c in scalar chop at - line 9. |