$ perl -MO=Deparse -le 'print "Fixed string"'
BEGIN { $/ = "\n"; $\ = "\n"; }
print 'Fixed string';
-e syntax OK
$