print "default line ending:\n";
{
   local $/="\n";
   print "Unix line ending:\n";
}
{
   local $/="\r\n";
   print "Win/DOS line ending:\n";
}
{
   local $/="\r";
   print "Antique MAC line ending:\n";
}