dimanche 5 juillet 2020

Perl getting syntax error in if-statement

I get a couple of syntax errors when trying to use an if-statement.

This is my code:

    use warnings; 
    use LWP::Simple;
    use POSIX;

    my $dtime = strftime('%Y-%m-%d %H:%M:%S', gmtime(1593953411))

    if ($dtime->day_of_week == 7 || $dtime->day_of_week == 6){
        $total_between_time = $total_between_time - $dayinsec
    }
    else{
        if (($time1+($i*$dayinsec)) + $dayinsec > $time2){
            print "beggining: ", $time1+$i*$dayinsec, " end: ", $time2, "\n";
        }
        else{
            print "beggining: ", $time1+$i*$dayinsec, " end: ", ($time1+($i*$dayinsec)) + $dayinsec, "\n";
        }
    }

I'm getting the following errors:

syntax error at ovning2.pl line 30, near "){"
syntax error at ovning2.pl line 33, near "else"

Why am I getting these errors?

Aucun commentaire:

Enregistrer un commentaire