{
    local $\ = "\r\n";
    print "Win/DOS line ending";
}