I'll wager a small amount that this will fix it for you:

my $csv = Text::CSV_PP->new({binary => 1});

Also it doesn't look like you're checking the $status returned from the parse() method. If that returns false, then the error_input() and error_diag() methods may be useful.