Help for this page
print "The square of $answer is ", $answer * $answer, "\n";
print join '', "The square of $answer is ", $answer * $answer, "\n";
print "The square of $answer is ". $answer * $answer. "\n";