#!/usr/bin/perl -w print "What is the outside temperature? "; chomp($temp = <STDIN>); if($temp > 75) { print "Too Hot\n"} elsif ($temp < 68) {print "Too Cold\n"} else {print "Just Right!\n"}