Please remove the "div" tags from your node.

One way to create an array of files names is to use glob

use warnings;
use strict;

for my $filename (glob '*.txt') {
    open my $fh, '<', $filename or die "can not open $filename: $!\n";
    while (<$fh>) {
        # your code
    }
    close $fh;
}
[download]