Select Code to Download

my @a=('abc',1);
given (@a) {
...
    when (['abc',1]) { print "copy\n" ;continue}
    when (\@a    ) { print "self\n" }
}

Argument "abc" isn't numeric in smart match at /home/lanx/tmp/ike_give
+n.pl line 9.
#
copy
self