class Dog {
    has Str $.name;

    method bark(Dog:D: Int:D $x) {
        say self.^name;
        say "bark" for 1..$x;       
    }
}

my $d = Dog.new(name => "Rover");
$d.bark(3);