You can get Perl to see the \r on input by setting the PERLIO environment variable to :raw.

set PERLIO=:raw
perl -ne "print if /\r/" file.txt
[displays lines]
[download]

This also allows you to write to text files without getting \r inserted. But it still doesn't solve the -i problem. Which kinda looks like a bug.