Only minor advantages. It's two fewer keystrokes and it makes output conform to the current input record seperator, which is sometimes good to ensure.

Mainly, it's one of my coding habits. I formed it under the superstition that it's more platform neutral. That's not really true, but the minor advantages win for a habit I've already got.

The truly handy way to stop fussing with newlines is to set local $\ = "\n"; and know that all distinct prints in that scope will get newlines appended.

$ perl -e'local $\ = $/; print for qw/foo bar baz/'
foo
bar
baz
$
[download]