I am trying to pass an array of arguments to the `qx` operator. Consider

```
my @files=qw(A.txt B.txt);
print qx/ls "@files"/;

```

This gives error:

```
ls: cannot access A.txt B.txt: No such file or directory

```

whereas substituting the array arguments explicitly:

```
print qx/ls A.txt B.txt/;

```

works fine. How can I pass a perl array to the `qx` operator such that each array element becomes a separate argument to the shell command?