$ perl -MO=Deparse -le '' -e syntax OK BEGIN { $/ = "\n"; $\ = "\n"; } (); #### $ perl -MO=Deparse -l001 -e '' -e syntax OK BEGIN { $/ = "\n"; $\ = "\001"; } (); #### $ perl -MO=Deparse -0001 -e '' -e syntax OK BEGIN { $/ = "\001"; $\ = undef; } ();