Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

Re: Run if weekend

by davido (Cardinal)
on Jun 14, 2016 at 16:06 UTC ( [id://1165613]=note: print w/replies, xml ) Need Help??


in reply to Run if weekend

Keeping it simple, localtime returns the day of the week in list context as the field at index 6:

print [localtime]->[6], "\n"; # Outputs 2 for me, today, because it's Tuesday and weeks start at 0 f +or Sunday.

So values of 0 or 6 would represent Sunday and Saturday.

Time::Piece, which comes with Perl, presents an object oriented interface into date/time manipulation:

use Time::Piece; my $t = localtime; print join(', ', $t->day_of_week, $t->day, $t->fullday), "\n"; # Outputs 2, Tue, Tuesday

However, you may also decide that it's a better separation of concerns, leading to more generally useful code if you let the code not care about the day of the week, and set up a crontab entry to do what cron does best.


Dave

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1165613]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others imbibing at the Monastery: (3)
As of 2024-04-26 03:47 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found