( my $flag2= $flag ) and ((-M '/tmp/c') > (-M '/tmp/d'));