summaryrefslogtreecommitdiff
path: root/t/lib/warnings/op
diff options
context:
space:
mode:
Diffstat (limited to 't/lib/warnings/op')
-rw-r--r--t/lib/warnings/op12
1 files changed, 12 insertions, 0 deletions
diff --git a/t/lib/warnings/op b/t/lib/warnings/op
index cc9be27cd1..69b36b0d67 100644
--- a/t/lib/warnings/op
+++ b/t/lib/warnings/op
@@ -682,6 +682,18 @@ EXPECT
Value of readdir() operator can be "0"; test with defined() at - line 4.
########
# op.c
+use warnings 'misc';
+open FH, "<abc";
+$_ = <FH> err $_ = 1;
+($_ = <FH>) // ($_ = 1);
+opendir DH, ".";
+$_ = readdir DH err $_ = 1;
+$_ = <*> err $_ = 1;
+%a = (1,2,3,4) ;
+$_ = each %a err $_ = 1;
+EXPECT
+########
+# op.c
use warnings 'redefine' ;
sub fred {}
sub fred {}