Help for this page
my $string = q("one","two","three"); my @array = split( /"(?:,")?/, $string );
my @array = split( /(?<!^)"(?:,")?/, $string );
my @array = qw( "one two three );
$array[0] =~ s/^"/;