That code is correct, but very confusing. You create a two element array, $s340Strings[0] == "\"abc\"," and $s340Strings[1] == "\"cdef\",\"yxx\",\"zzz\"". That may be what you intended, but when I read it, it looks like you intend:

my @s340Strings = qw(abc cdef yxx zzz);
# or
my @s340Strings = ("abc","cdef","yxx","zzz");
[download]

Just trying to clarify...

    -Bryan