gistfile1.txt

class Foo {
  multi method foo(::Whatever $a) {
    return "*";
  }
  multi method foo(Str *@a) {
    return "!";
  }
}

use Test;
plan *;

my Foo $foo .= new;
is($foo.foo(*), '*');
is($foo.foo(2), '!');



ok 1 - 
not ok 2 - 
#      got: '*'
# expected: '!'