print FORMATTED FILE "$SECU\n"; sub _showSecInfo { system ("$SEC","t"); system ("$SEC","s"); };