while (<LOGFILE>) {
  my %hash=split /\|/,$_;
  ## do something with %hash ala $hash{time} or $hash{bytes}
}