Skip to content

Instantly share code, notes, and snippets.

@tobyink
Created August 21, 2012 10:24
Show Gist options
  • Save tobyink/3414197 to your computer and use it in GitHub Desktop.
Save tobyink/3414197 to your computer and use it in GitHub Desktop.
use 5.014;
use Data::Dumper;
package Foo {
use Moose;
sub bar { ... }
}
print Dumper [ Foo->meta->get_method_list ];
print Dumper [ Foo->new->meta->get_method_list ];
@tobyink
Copy link
Author

tobyink commented Aug 21, 2012

Output (on my machine) is...

$VAR1 = [
          'bar',
          'meta'
        ];
$VAR1 = [
          'bar',
          'meta'
        ];

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment