$ perl -E 'my $var = "123\n"; say $var;'
123


$ perl -E 'my $var = "123\n"; say "|$var|";'
|123
|