perl -MExtUtils::MY -e 'MY->fixin(@ARGV)' *.pl