use Data::Dumper;
my @pal_files = glob '*palindromes.csv';
print Dumper(\@pal_files);
[download]

To read the files, just open them in a loop:

for my $file (@pal_files) {
    open my $IN, '<', $file or die "$file: $!\n";
    while (my $line = <$IN>) {
        # Process the line...
    }
}
[download]

You can also assign the filenames to @ARGV and use the diamond operator:

@ARGV = glob '*palindromes.csv';
while (my $line = <>) {
    # Process the line...
}
[download]

($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord
}map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,
[download]