my $mtime = time();
if ($rtime < $mtime + 86400 * 30) {
    ## Do whatever processing
}