print "$PID|$SID|",shift(@flds),"|$date\n" if $flds[0];