|
#!C:\Perl\Bin\
$num1=25;
print "\n\n\$num1 = $num1\n\n";
$num2=10;
print "\$num2 = $num2\n\n";
$string1="20";
print "\$string1 = $string1\n\n";
$string2="Maximum Speed ";
print "\$string2 = $string2\n\n";
$result1 = $num1 + $num2; # $result1 contains 35
print "\$result1 = $result1 \n\n";
$result2 = $result1 + $string1; # $result2 contains 55
print "\$result2 = $result2 \n\n";
$result3 = $string2 . $result2; # $result3 contains "Maximum Speed 55"
print "\$result3 = $result3 \n\n";
|