Add tests for @array ~~ $string
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Tue, 5 May 2009 07:55:27 +0000 (09:55 +0200)
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Tue, 5 May 2009 07:55:27 +0000 (09:55 +0200)
t/op/smartmatch.t

index b2a213e..cf819be 100644 (file)
@@ -306,6 +306,10 @@ __DATA__
        12345           qr/3/
 !      12345           qr/7/
 
+# array against string
+       @fooormore      "@fooormore"
+!      @keyandmore     "@fooormore"
+
 # Test the implicit referencing
        7               @nums
        @nums           \@nums