Because it's a fixed-width file, with no line terminators. This will work however (as a filter):

local $/ = \5201;
while (<>) {
    chop;
    print;
}
[download]

'man perlvar' for details.