#!/usr/local/bin/perl


# first, we create a variable that will hold our input
# Note: '=' is an assignment operator; it assigns
# the right-side value to the left-side variable

$input = ""; # all Perl statements must end with a semicolon


# 'print' is Perl built-in function; it takes a 
# variable or literal value (in this case, a string)
# and prints it to screen. 
print "\nGuess a number from 1 to 5.\n";
print "Type \'q\' to quit.\n\n";
print ">>> ";


# wait for input:
# while the program is running, it will return to this
# point and wait for input
while (<>)
{
  $input = $_;   # put the input into variable
  chomp($input); # the input includes the return character
                 # from ENTER; chomp() is Perl built-in 
                 # function removes any 'white space'
                 # (space and new-line characters, tabs, etc.)
                 # from a string
 
  # ----------------- write your code here --------------- #

	


  
  # ----------------------------------------------------- #
  
	print ">>> ";	
}