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";
## print join '', "The square of $answer is ", $answer * $answer, "\n"; ##
## print "The square of $answer is ". $answer * $answer. "\n";