From: Rafael Garcia-Suarez Date: Fri, 13 Feb 2009 15:23:28 +0000 (+0100) Subject: More tests for array-ref smart match X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=25a0c96dcc03468ea222618d7114b40e33f8486e;p=p5sagit%2Fp5-mst-13.2.git More tests for array-ref smart match --- diff --git a/t/op/smartmatch.t b/t/op/smartmatch.t index 0b6ce1a..0cc9cf0 100644 --- a/t/op/smartmatch.t +++ b/t/op/smartmatch.t @@ -206,9 +206,13 @@ __DATA__ # - a number [qw(1foo 2bar)] 2 + [qw(foo 2)] 2 + [qw(foo 2)] 2.0_0e+0 +! [qw(1foo bar2)] 2 # - a string ! [qw(1foo 2bar)] "2" + [qw(1foo 2bar)] "2bar" # Number against number 2 2