RosettaCodeData/Task/Call-an-object-method/Perl-6/call-an-object-method-3.pl6

my $object = "a string";  # Everything is an object.
my method example-method {
    return "This is { self }.";
}

say $object.&example-method;  # Outputs "This is a string."