Select Code to Download

$ perl -MO=Deparse -ce '$a->method'
$a->method;
...
$ perl -MO=Deparse -ce '$a->method()'
$a->method;
-e syntax OK

$ perl -MO=Concise -ce '$a->method()'
7  <@> leave[1 ref] vKP/REFC ->(end)
...
4           <#> gvsv[*a] s ->5
5        <$> method_named[PV "method"] ->6
-e syntax OK

$ perl -MO=Concise -ce '$a->method' > a
-e syntax OK
...
-e syntax OK
$ diff a b | wc -l
0

$a->method / 1 # /;
$a->method() / 1 # /;