I need help setting up a method

[ToddAndMargo via perl6-users]

Hi All,

I have so far:


   class BadMath {
       has Int $.A;
       has Int $.B;

       method BadAdd()  {
          my $Clinker = (-5..5).rand.truncate;
          return $!A + $!B + $Clinker;
       }
   }


   my $TwoPlusTwo = BadMath.new( A => 2, B=> 2 );
   print $TwoPlusTwo.BadAdd ~ "\n";


How do I modify the declaration such that I can
address the method as such?

     say (2,2).BadAdd;
     No such method 'BadAdd' for invocant of type 'List'


I want my 10 in 11 chance to win a participation trophy!

Many thanks,
-T