Select Code to Download

use warnings;
use strict;
...
    $^O eq 'MSWin32' ? "Foo\nBar\nQuz\n" : "Foo\nBar\nQuz\n";
is slurp($tf{mix},  ''     ),
    $^O eq 'MSWin32' ? "Foo\nBar\nQuz\n" : "Foo\r\nBar\nQuz\r\n";