while (scalar @list_words) {
test_if_letters_are_included();
foreach(@list_words) {
print "$_\n";
}
my @array = qw(this that the other thing);
say "@array";
say "@list_words";
say scalar @list_words;
}
####
...ZONDA
ZONED
ZONES
ZOOID
ZOOKS
ZOOMS
ZOONS
ZORIS
ZOSMA
ZUDDA
ZULUS
ZUNIS
this that the other thing
ZUNIS
8471
####
while (scalar @list_words) {
test_if_letters_are_included();
foreach(@list_words) {
print "$_\n";
}
my @array = qw(this that the other thing);
print "@array";
say "@list_words";
say scalar @list_words;
}
####
...ZONDA
ZONED
ZONES
ZOOID
ZOOKS
ZOOMS
ZOONS
ZORIS
ZOSMA
ZUDDA
ZULUS
ZUNIS
this that the other thing
ZUNIShat the other thingABASE
8471