$fileArray;
my $totlogfile = "$today-TotalLogFile";
my $totlogfile1 = "today-TotalLogFile1";
my $totlogfilebkup="TotalLogFileBkup";
open(total,">$totlogfilebkup") || die("Could not open out file!$outfile");#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 open file! $logfilename");#$logfilename declared
                        while($line = <logfile>)
                        {
                            chomp($line);
                            unless(( $line =~ /\.gif/i ) || ( $line =~ /\.jpg/i ) || ( $line =~ /\.jpeg/i ) || ( $line =~ /\.js/i ) || ( $line =~ /\.css/i ) || ( $line =~ /tickerServlet/i ) || ( $line =~ /nagios/i ) || ( $line =~ /statusservlet/i ))
                            {
                              print total "$line\n";                                
                            }
                        }
                      close logfile;                        
                }
           }
        closedir(DIR);
close total;