open FILE1, "text_file_with_words.txt" or die;
my %hash;
while (my $line=<FILE1>) {
   chomp($line);
   (my $word1,my $word2) = split /:/, $line;
   $hash{$word1} = $word2;
}

use Data::Dumper;
print Dumper \%hash;

##</code><code>##

$VAR1 = {
          'word1' => 'word2',
          'word5' => 'word6',
          'word3' => 'word4'
        };