I suspect you're running into the Internet Line Terminator aka \r\n. Try something like this.

{
    local $/ = "\r\n";
    chomp $msg;
}
[download]

Better yet, check what that character actually is. \r = 13.

chomp $msg;
print ord(reverse $msg), "\n";
[download]