my @wordsCopy = @words;
    my $reference = shift @wordsCopy;