argv => $arg_string,
prefilter =>
sub { $_ = $_[0]; s/^\s*method\s+(\w.*)/sub METHOD_$1/gm; return $_ },
postfilter =>
sub { $_ = $_[0]; s/sub\s+METHOD_/method /gm; return $_ }
);
argv => $arg_string,
prefilter =>
sub { $_ = $_[0]; s/^\s*method\s+(\w.*)/sub METHOD_$1/gm; return $_ },
postfilter =>
sub { $_ = $_[0]; s/sub\s+METHOD_/method /gm; return $_ }
);