# find whether the today is working day ?
&Is_WorkDay(&ParseDate(&DateCalc("today", "+9 hours")))
# find whether the current time is within current working day ?
# find current hour with localtime function.
print "yes" if ( $cur_hr > 9 && $cr_hr < 17 )