for my $file (<*.txt>)
{
    open my $add, '>>', $file or die "Can't open file: $!\n";
    print $add $txt;
    close $add or die "Can't close file: $!\n";
}