foreach (<$FHIN>){
   my ($dow, $month, $dom, $time, $pid, $user, $status, $client, $ip, $file_path, $dl_speed) = split / /,$_;
}