perl -ne 'print ++$n,". $1 " if /^name:\s*(.*)/; print $1,$/ if /^date:\s*(.*)/'