unless (my $return = do $script)
{
    warn "could not parse $script: $@"   if $@;
    warn "could not pull in $script: $!" unless defined $return;
    warn "could not execute $script"     unless $return;
}