Script Perl
Per lavoro ho dovuto fare uno script in perl per lockare gli utenti che non si collegano su un server da piu' di 60 giorni ($maxdays). Questo script non fa altro che memorizzare in un array (@ll) l'output ripulito del comando `lastlog` il contenuto dell'array viene diviso per ottenere utente e data dell'ultimo login, la data viene rielaborata per avere un formato utile a fare la differenza con la data corrente e se il risultato è maggiore o uguale a 60 locka l'utente [system("usermod -L $user")]
Per fare la differenza fra le date ho utilizzato due metodi (due script che fanno la stessa cosa in modi diversi):
Questi scripts li reputo abbastanza inutili..ma sono stati commissionati per "salvaguardare la sicurezza" di un server esposto..bah..almeno ho imparato un po' di perl.. 
Commenti, critiche e consigli sono ben accetti.. 
