#!/usr/bin/perl

use autodie;
use diagnostics;

use strict;
use warnings;

use 5.010;

my @array = ('a', 'b', 'v', 'h', 'j');

print "@array\n";


##</code><code>##

#!/usr/bin/perl

use autodie;
use diagnostics;

use strict;
use warnings;

use 5.010;

###########################################
# read word list (csw.txt contains all the 
# valid words from the CSW scrabble word list)
open my $fh, '<', 'csw.txt' or die $!;
chomp (my @words = <$fh>);
close $fh;

print "@words\n";