Perl does not insert newline characters on its own.
Except in some cases, like when you use "say" instead of "print".

"say Just like "print", but implicitly appends a newline. "say LIST" is simply an abbreviation for "{ local $\ = "\n"; print LIST }"."
Please check `perldoc -f say` for more information.