my $deux = $toto, print "\n", $tutu;

##</code><code>##

$deux = "$toto\n$tutu";        # variable interpolation in double-quoted strings
$deux = $toto . "\n" . $tutu;  # string concatenation

##</code><code>##

print $toto, "\n", $tutu;