use strict;
use warnings;
use Data::Dump;

my  @array = qw("this" "xxx" "is" not "xxx" and "xxx" "whatever");
dd \@array;