#!/usr/bin/perl
# program name example4.pl
#shows the use of if and else statements
print("enter a number: ");
$number = <STDIN>;
if ($number == 10)
{
print("That is the number i was thinking of.\n");
}
else
{
print("you enterred $number\n");
}