Statement Perl

#!/usr/local/bin/perl 
print ("Enter a number:\n"); 
$number1 = 
chop ($number1); 
print ("Enter another number:\n"); 
$number2 = 
chop ($number2); 
if ($number1 == $number2) { 
    print ("The two numbers are equal.\n"); 
} else { 
    print ("The two numbers are not equal.\n"); 

print ("This is the last line of the program.\n");