Is there a test module to check eol() in dist files?

[Burak Gürsoy]

I think that something like this can be useful when packing distros. I
end-up with mixed eol (not in the same file) most of the time:

use Test::EOL;
eol('lib/Foo/Bar.pm', 'LF');
eol('lib/Foo/Bar.pm', 'Unix');
eol_is_mixed('lib/Foo/Bar.pm');
eol_is_mixed('lib/Foo/Bar.pm', [qw/ LF CRLF /]);
eol_isnt_mixed('lib/Foo/Bar.pm');
all_eol('Unix');
all_eol_isnt_mixed();
# etc.

(in case I missed it) is there a module to run this kind of tests?