my $lctime = strftime("%m_%d_%y",localtime[3 .. 5]); 
my $fltime = strftime("%m_%d_$y",localtime(stat($filename)[9])[3 .. 5]); 
if ($lctime = $fltime) { 
    # processs file data 
}