toolic posted:

You can get a list of XML files in a directory using glob. Then, loop over those files

use strict;
use warnings;
use 5.010;


open my $OUTFILE, '>', 'data.txt'
    or die  "Couldn't open data.txt: $!";

for (1 .. 10) {
    say {$OUTFILE} 'hello world';
}

close $OUTFILE;
[download]