Help for this page
$sensitive_code = eval 'sub { my ($foo,$bar,$baz) = @_; ... return; }'; $sensitive_code->("charanga","Boom","BANG");