(my $sec0,my $min0,my $hour0,my $mday0,my $mon0,my $year0,my $wday0,my $yday0,my $isdst0) = localtime($theLocalTime+86400);
        (my $sec1,my $min1,my $hour1,my $mday1,my $mon1,my $year1,my $wday1,my $yday1,my $isdst1) = localtime($theLocalTime+172800);
        (my $sec2,my $min2,my $hour2,my $mday2,my $mon2,my $year2,my $wday2,my $yday2,my $isdst2) = localtime($theLocalTime+259200);
        (my $sec3,my $min3,my $hour3,my $mday3,my $mon3,my $year3,my $wday3,my $yday3,my $isdst3) = localtime($theLocalTime+345600);
        (my $sec4,my $min4,my $hour4,my $mday4,my $mon4,my $year4,my $wday4,my $yday4,my $isdst4) = localtime($theLocalTime+432000);
        (my $sec5,my $min5,my $hour5,my $mday5,my $mon5,my $year5,my $wday5,my $yday5,my $isdst5) = localtime($theLocalTime+518400);
        (my $sec6,my $min6,my $hour6,my $mday6,my $mon6,my $year6,my $wday6,my $yday6,my $isdst6) = localtime($theLocalTime+604800);
 
        @monArray =  ($mon0,$mon1,$mon2,$mon3,$mon4,$mon5,$mon6);
        @mdayArray = ($mday0,$mday1,$mday2,$mday3,$mday4,$mday5,$mday6);
        @wdayArray = ($wday0,$wday1,$wday2,$wday3,$wday4,$wday5,$wday6);

##</code><code>##

$sql = "SELECT facility, department, name, soc, anniversary, years "."FROM EMPFILE "."WHERE ((anniversary LIKE '".($monArray[0]."/".$mdayArray[0])."') OR "
        ."(anniversary LIKE '".($monArray[1]."/".$mdayArray[1])."') OR "
        ."(anniversary LIKE '".($monArray[2]."/".$mdayArray[2])."') OR "
        ."(anniversary LIKE '".($monArray[3]."/".$mdayArray[3])."') OR "
        ."(anniversary LIKE '".($monArray[4]."/".$mdayArray[4])."') OR "
        ."(anniversary LIKE '".($monArray[5]."/".$mdayArray[5])."') OR "
        ."(anniversary LIKE '".($monArray[6]."/".$mdayArray[6])."')) "
        ."ORDER BY facility, years DESC";       

##</code><code>##

eval{$sqlH = $dbh->prepare($sql);};