comment on

This is a bit more advanced, but it lets you assign a list of states to a region, and then generates a hash keyed by state name from.

# Make a hash of regions, pointing to an array of states in each regio
+n.
# use qw() to quote words. 
# Use _ for spaces, replace with space when turning hash inside out.
my %regions = (
    southern => [ qw(
        Alabama
        Georgia 
        Tennessee
        West_Virginia
    ) ],
    western => [ qw(
        Oregon Washington California Idaho Montana
    )],
   # ...
);

# Turn %regions inside out.
my %states;           # Winds up with data like $states{Oregon} = west
+ern
foreach my $region (keys %regions) {
    foreach (@$regions{$region}) {    # Copy the state list
        s/_/ /g;    # replace _ with spaces.  West_Virginia becomes We
+st Virginia
        $states{$_} = $region  # Store the state info.
    }
}
[download]

TGI says moo

In reply to Re^2: Use Hash? Array? Still confused after all these years. by TGI
in thread Use Hash? Array? Still confused after all these years. by hmbscully

Are you posting in the right place? Check out Where do I post X? to know for sure.
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
Want more info? How to link or How to display code and escape characters are good places to start.


Clear questions and runnable code get the best and fastest answer
	PerlMonks