use strict; use warnings; #### perl -c test.pl #### use diagnostics;
## perl -c test.pl ##
## use diagnostics;