A one-liner that executes cleanly under use strict.

#!/usr/bin/perl -w

do { use English; use strict } while($DEBUGGING) and not die;
[download]