CyberTek - the future at the present!

Estrarre da log ultima login imap/pop3

Utilizzando perl con questo semplice comando si può creare al volo un elenco degli utenti che hanno effettuato la login affiancando data ed ora della stessa.

Per le login imap:
perl -ne '$l{$2}=$1 if /^(.{15}) .* imap-login: Login: user=<([^>]+)>/; END { print "$_ last imap-login: $l{$_}\n" for keys %l }' /var/log/mail.log

Per le login pop3:
perl -ne '$l{$2}=$1 if /^(.{15}) .* pop3-login: Login: user=<([^>]+)>/; END { print "$_ last pop3-login: $l{$_}\n" for keys %l }' mail.log

 

 

Published in: linux, perl, scripts, shell, tips

Add A Comment

Powered by pmar s.r.o.