Re^4: Calculating next business day (weekends/holidays taken into account)


"be consistent"
	PerlMonks

Re^4: Calculating next business day (weekends/holidays taken into account)

by vxp (Pilgrim)

on Jun 24, 2009 at 21:34 UTC ( [id://774528]=note: print w/replies, xml )

Need Help??

in reply to Re^3: Calculating next business day (weekends/holidays taken into account)
in thread Calculating next business day (weekends/holidays taken into account)

nope..

after some discussion in the chatterbox it was determined that the only way to use modules (and still comply with the security policies on that box) is to just copy/paste them into my script. it sucks, but its the only way. :/

so, keeping that in mind - any ideas for my sub get_next_business_day { } ? :)

Comment on Re^4: Calculating next business day (weekends/holidays taken into account)

Replies are listed 'Best First'.

Re^5: Calculating next business day (weekends/holidays taken into account)
by grep (Monsignor) on Jun 25, 2009 at 02:46 UTC

Time::Local

localtime

Create a constant that contains the value of a days worth of seconds (60 * 60 * 24). When you need to increment a day get the epoch and add a days worth of seconds, then convert that back to your date. Once you have that date, check if that new date is a business day or not. I would use noon as your HH:MM:SS when you convert from date to epoch.

This is a lot more work and you have to deal with localtime's 0 and 1 based ranges. Break everything down to small manageable subs. One for date to epoch and the other way.

grep
One dead unjugged rabbit fish later...

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom