$ cat output_record_separator.pl 
use v5.24;
use strict;
#use warnings;

$\ = 'ORS';
say "Foo$\\Bar";

$ perl output_record_separator.pl 
FooORSBar