- or download this
($JUNK, $user, $JUNK) = split (/\s+/, $data_line);
...
($user, $IP, $machine, $VER, $JUNK, $PID, $JUNK, $SDAY, $SDATE, $start
+_time) = split (/\ /, $data_line);
- or download this
(undef, $user, undef) = split (/\s+/, $data_line);
...
($user, $IP, $machine, $VER, undef, $PID, undef, $SDAY, $SDATE, $start
+_time) = split (/\ /, $data_line);