No need for the second local $/ and the first can be made even more local:

my @splitted = do {
    local $/ = "\r";
    map { split m/\003/ => $_, -1 } <>;
    };
[download]