>perl -ne "/^(.*) INFO.+Successfully sent(?{$1})/ }{ print $^R" file