Don't split the $ARGV, join localtime[2]and localtime[1] with a : and compare the string..
At least, that's what I did in almost the exact same situation (acutally I got tired of people kicking the back of my chair to wake me up after lunch). Working my way to a "snooze button" now :-)