use strict;

my $day = (localtime())[3];
while($day < 31) {
    if(0 == $day % 6) {
        do_email_program_thingy();
    } else {
        sleep(60 * 60 * 24);
    }
    $day = (localtime())[3];
}