--- sysplogd	2009/04/17 10:03:00	19
+++ sysplogd	2009/04/17 10:04:02	20
@@ -128,8 +128,12 @@
 		my ( $program, $pid );
 
 		if ( $buf =~ s/^\s*([^:]+)\s*:\s*// ) {
-			$program  = $1;
-			$pid      = $1 if $program =~ s/\[(\d+)\]$//;
+			$program = $1;
+			if ( $program =~ s/\[(\d+)\]$// ) {
+				$pid = $1;
+			} elsif ( $buf =~ s/^(\d+):\s*// ) {
+				$pid = $1;
+			}
 		}
 
 		$values[1] = $buf;