{
    use methods $app => qw/log .../;
    log("something");
}

##</code><code>##

sub log {
   $app->log(@_);
}