#!/usr/bin/perl -pi s/^\s*use\s+(diagnostics|strict|vars|warnings).*//g