#!D:\Perl\bin\perl

use warnings;
use strict;

    open my $outfile,">>", "words.txt";

my @word_characters = (0..9);

foreach my $character(@word_characters) {
	print $outfile "$character\n";
}
close $outfile;