in reply to Passing input through a hash then displaying results

You probably would want to do something like the following: 
my $grade = <STDIN>;

my %scores = (
        "90" => "A",
        "80" => "B",
        "70" => "C",
        "60" => "D",
        "50" => "F");

my $letter_score = $scores{$grade};
if ($letter_score eq "A"){
 #return this
}

[download]

There is really no need to loop to lookup key/value pairs. I hope this helps. If you're trying to execute statements you may want to look into the eval function.
s;;5776?12321=10609$d=9409:12100$xx;;s;(\d*);push @_,$1;eg;map{print chr(sqrt($_))."\n"} @_;

Replies are listed 'Best First'.
Re^2: Passing input through a hash then displaying results
by ikegami (Patriarch) on Jan 23, 2007 at 07:15 UTC
    What if he scored 89? That's why the looping is needed ( if you use a hash ).
[reply]
      I would think for such a simple program no need to loop, but just simple if control statements would suffice.
      s;;5776?12321=10609$d=9409:12100$xx;;s;(\d*);push @_,$1;eg;map{print chr(sqrt($_))."\n"} @_;
[reply]

        Sorry, I meant to say "That's why the looping is needed if you use a hash."

        Of course, you could just do 

        sub get_score {
   my ($score) = @_;
   return 'A' if $score >= 90;
   return 'B' if $score >= 80;
   return 'C' if $score >= 70;
   return 'D' if $score >= 60;
   return 'F';
}

        [download]
[reply]
[d/l]
        How do I represent the values and keys in a loop or conditional statement?
[reply]

In Section Seekers of Perl Wisdom