I don't see how you're going to program Perl to come up with US States when US States are required by the question and flowers when flowers are required and so on.

Given a list of flowers, the algorithm to find which scores highest in your game should be something like: 

sub calculate_score {
    my $word         = shift();
    my $score        = 0;
    my %letter_value = ();
    my @letters      = split( '', $word );
    foreach ( @letters ) {
        if ( defined( $letter_value{$_} ) ) {
           $letter_value{$_} = $letter_value{$_} * 2;
           $score += $letter_value{$_};
         } else {
           $score += 1;
           $letter_value{$_} = 1;
        }
    }
    return $score;
}

[download]

Which assumes that each letter is worth 1 the first time you use it, 2 the second time, 4 the third and so on. it gives me a score of 18 for "alabama" and a score of 47 for "lillipilli".

But as I say, I don't know how you get your lists of words in the first place.


($_='kkvvttuu bbooppuuiiffss qqffssmm iibbddllffss')
=~y~b-v~a-z~s; print

In reply to Re: Challenge: Letter Power by Cody Pendant
in thread Challenge: Letter Power by Tanktalus

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.