in reply to Is there a variable in which Perl stores the native file delimiter for the platform on which your script is running?

While not precisely what you asked for, Text::FixEOL will probably do what you are trying to do.
  • Comment on Re: Is there a variable in which Perl stores the native file delimiter for the platform on which your script is running?

In Section Seekers of Perl Wisdom