diff --git a/ACU/Process.pm b/ACU/Process.pm index 13ed468..a1473d3 100644 --- a/ACU/Process.pm +++ b/ACU/Process.pm @@ -64,7 +64,7 @@ sub do_work ($$$@) eval { $parser->parse_string(${ $_[0]{argref} }); - } + }; if ($@) { my $err = "Parse error: $@"; log ERROR, $err; @@ -73,7 +73,7 @@ sub do_work ($$$@) eval { return $subref->($given_args, $args); - } + }; if ($@) { my $err = $@; log ERROR, $err; @@ -94,7 +94,7 @@ sub register_no_parse ($$;$) { eval { return $subref->($given_arg, $_[0]{argref}); - } + }; if ($@) { my $err = $@; log ERROR, $err;