while () {

##</code><code>##

while (<USERS>) {

##</code><code>##

  $j, $j, $j, $j, $j, $month, $date, $time, $uname) = split;

##</code><code>##

  ($month, $date, $time, $uname) = (split)[5..8];