ich weiss nicht, ob Archive::Extract dir eine liste liefern kann. wenn nicht, musst du selber nach den files suchen.
File::Spec->catfile ist hier jedenfalls nicht sinnvoll. das liefert eine datei zurück. aus der doku zu File::Spec:

Quote

Concatenate one or more directory names and a filename to form a complete path ending with a filename

wie kommst du drauf, dass es dir eine liste zurückliefert von dateien und wie soll diese liste aussehen?
willst du vielleicht sowas wie File::Find?