2009/10/28 Barry Brevik <BBrevik@[...].com> 

>  So after all these years, I'm wondering, is there a PERLish way to add a
>  "\n" in the same line of code that prints the default $_ variable?
> 
> 
From perlvar:

    IO::Handle-> output_record_separator EXPR
    $OUTPUT_RECORD_SEPARATOR
    $ORS
    $\      The output record separator for the print operator. If defined,
            this value is printed after the last of print's arguments.
            Default is "undef". (Mnemonic: you set $\ instead of adding "\n"
            at the end of the print. Also, it's just like $/, but it's what
            you get "back" from Perl.)

However I would not recommend to use it (so not PERLish) as it makes the
code less explicit. Also, the problem of $\ is that as with all lexical
variables it may have side effects where you do not expect. See this code:

sub foo
{
    print "Foo\n";
}

print "A\n";
foo;

{
    local $\ = "...\n";
    print "B";
    foo;
    print "C";
}
print "D\n";

Here is the output :
A
Foo
B...
Foo
...
C...
D