Shell Programming and Scripting

$
$
$ echo "Tue 6:00 AM-Wed 10:00 PM" | perl -lne 'BEGIN {%dow=qw(Sun 0 Mon 1 Tue 2 Wed 3 Thu 4 Fri 5 Sat 6)}
           /^(\w+)\s*(\w+):(\w+)\s*(\w+)-(\w+)\s*(\w+):(\w+)\s*(\w+)$/;
           $smin = $2*60+$3+($4 eq "PM" ? 12*60 : 0);
           $emin = $6*60+$7+($8 eq "PM" ? 12*60 : 0);
           @x = localtime;
           if ( ($x[6] < $dow{$1}) or
                ($x[6] == $dow{$1} and ($x[2]*60+$x[1]) < $smin) or
                ($x[6] > $dow{$5}) or
                ($x[6] == $dow{$5} and ($x[2]*60+$x[1]) > $emin)
              ) {
             print "Current date/timestamp is outside the range => $_"
           } else {
             print "Current date/timestamp is within the range => $_"
           }'
Current date/timestamp is within the range => Tue 6:00 AM-Wed 10:00 PM
$
$
$

DOW_TODAY=$(date +%u)
thisweek()
{
  DOW=$(date --date "$1" +%u)
  [ $DOW -lt $DOW_TODAY ] && date --date "${1}-7days" +%s && return
  date --date "${1}" +%s
}
 
END=${1#*-}
START=${1%-*}
NOW=$(date +%s)
if [ $NOW -ge $(thisweek $START) -a $NOW -le $(thisweek $END) ]
then
   echo "In range"
else
   echo "Not in range"
fi

$ inrange "Mon 01:00AM-Fri 09:00PM"
In range
 
$ inrange "Mon 01:00AM-Tue 01:00AM"
Not in range
 
$ inrange "Thu 11:00PM-Fri 11:00PM"
Not in range
 
$ inrange "Yesterday 11PM-3PM"
In range