my $LOGFILE = "iptraf.log";
open(LOGFILE, $LOGFILE) or die("Could not open log file.");
foreach my $line (<LOGFILE>) {
    #chomp($line);      
}

##</code><code>##

while (<$handle>) {
   # ...
}