in reply to how to return info from functions
rollback (methodfunction ()) [download]
sub rollback { my $reason = shift // return; ... } [download]