#!/usr/bin/perl -pi

s/^\s*use\s+(diagnostics|strict|vars|warnings).*//g;

/^__END__/ and $_ = '', close ARGV;