mailq | perl -ne 'chomp();s/^$/\n/g;s/^-.*//g;print $_;'