You're not terribly clear in your goals but if you just want the pieces in an array, use

my $data = q("one"," one,two",3,"a like <A HREF="foo"> b</A>");

my @pieces = split(q(,), $data);
[download]

This assumes that you have a comma-delimited set of data, which appears to be true from your sample.
Update:
I need to be more careful, don't I? Sorry that I didn't see the embedded comma. As a result, my suggestion is worthless.