Select Code to Download

use warnings;
use strict;
...
use Test::More tests=>1;
my @o = parse "1,Something\\,\\\\text\\\\text\\x2B\\\\,X,99";
is_deeply \@o, ["1","Something,\\text\\text+\\","X","99"];