I need this PYTHON program converted into PERL. i also need it to be run in the command line. please include code converted into PERL and a GOOD screen shot of it running in the command line. Many thanks!!

#print ("Please enter the time") shift-3 comments out the code time = int(input("Please enter the time")) mondayOff = (input("Do you have Monday Off?")) majorTask = (input("Do you have any Major Tasks?")) gameOfThrones = (input("Do you want to watch The Game Of Thrones?")) if((time > 1000 or majorTask == "No") and gameOfThrones == "Yes" and mondayOff == "Yes"): print("You can watch The Game Of Thrones") else: print("Sorry Buddy, you can't watch anything because you have work Monday & chores to do")