#!/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";