$fileArray;
my $totlogfile = "$today-TotalLogFile";
my $totlogfile1 = "today-TotalLogFile1";
my $totlogfilebkup="TotalLogFileBkup";
open(total,">$totlogfilebkup") || die("Could not open out file!$outfil
+e");#outfile is declared before
opendir(DIR, "logfiles") or die "couldn't open logs";
          while ( defined ($filename = readdir(DIR)) ) 
           {
             $index = index($filename,$yesterday);
              if ($index > -1) 
              {
                $fileArray[$count] = $filename;
                $count = $count + 1;
                    print "The log file name is $filename.\n";
                      open(logfile,"$filename") || die("Couldx not ope
+n file! $logfilename");#$logfilename declared
                        while($line = <logfile>)
                        {
                            chomp($line);
                            unless(( $line =~ /\.gif/i ) || ( $line =~
+ /\.jpg/i ) || ( $line =~ /\.jpeg/i ) || ( $line =~ /\.js/i ) || ( $l
+ine =~ /\.css/i ) || ( $line =~ /tickerServlet/i ) || ( $line =~ /nag
+ios/i ) || ( $line =~ /statusservlet/i ))
                            {
                              print total "$line\n";                  
+              
                            }
                        }
                      close logfile;                        
                }
           }
        closedir(DIR);
close total;
[download]

while($line = <logfile>)
{
    unless( $line =~ /(\.gif|\.jpg|\.jpeg|\.js|\.css|tickerServlet|nag
+ios|statusservlet)/
    {
        print total $line;                                
    }
}
[download]


holli, regexed monk

Holli,
You are really helpful.Thanks.I also would like to know how does this make differnece?.Just curious.Does using of HASH reduce the process time.
I am just a beginner.Please bear with me.
Thanks