Using class as sub

use Test;
use MySub;

my UInt $counter;
my-sub executing-something {
    # say &?ROUTINE; # errors
    $counter++
}

my-sub returning-something {
    "the returned value"
}

# cant parse signature
#my-sub say-answer($answer = 42) {
#    say $answer
#}

executing-something;
is $counter, 1, "it does run the first time";
executing-something;
is $counter, 2, "it does not run the second time";

is returning-something, "the returned value", "it does not return the correct value";

done-testing