# New Ticket Created by Elliot Shank
# Please include the string: [perl #66810]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=66810 >
The code below results in an error:
Method '!.^' not found for invocant of class 'Perl6;Grammar'
-----
my $file = $*PROGRAM_NAME;
my $handle = open $file;
my $source_code = $handle.slurp();
my $parse_tree = Perl6::Grammar.parse($source_code);
for $parse_tree.^methods() {
say ">$_< {$_.PARROT()}";
} # end for