Re: Replacing If Elsif Else with Hash

in reply to Replacing If Elsif Else with Hash

This will return 'grey' if you use a severity not defined in the hash:

my %bkcolor = (
    'Extreme'  => 'red',
    'Severe'   => 'orange',
    'Moderate' => 'yellow',
    'Minor'    => 'green',
);

my $background = $bkcolor{$severity} // 'grey';
[download]

Comment on Re: Replacing If Elsif Else with Hash Download Code

Replies are listed 'Best First'.
Re^2: Replacing If Elsif Else with Hash by moritz (Cardinal) on Nov 24, 2012 at 08:59 UTC
It is worth noting that the `//` operator is new perl 5.10.0, so if yo uuse it, you should start your code with `use 5.010;` [download] Then if somebody accidentally runs the code with an older version of perl, you get a much better error message. Perl 6 - the future is here, just unevenly distributed	[reply] [d/l] [select]
Re^2: Replacing If Elsif Else with Hash by johnfl68 (Scribe) on Nov 24, 2012 at 05:29 UTC
Thank you very much for you time and help! John	[reply]

In Section Seekers of Perl Wisdom