perl -Mdiagnostics=-t some_broken_script