% This document was generated automagically by lgrind.  DO NOT EDIT.

\LGinlinefalse\LGbegin\lgrinde
\L{\LB{\C{}\V{\#}!\1usr\1interp\1perl -w}}
\CE{}\L{\LB{}}
\L{\LB{\C{}\V{\#} NESTED IF IN PERL EXAMPLE}}
\CE{}\L{\LB{\C{}\V{\#} By Louis Ziantz}}
\CE{}\L{\LB{}}
\L{\LB{\C{}\V{\#} Description: This program is a demonstration a nested}}
\CE{}\L{\LB{\C{}\V{\#}              if structure in Perl.}}
\CE{}\L{\LB{\C{}\V{\#} Procedure:   A grade is read, and an appropriate}}
\CE{}\L{\LB{\C{}\V{\#}             grade counter is incremented based on}}
\CE{}\L{\LB{\C{}\V{\#}             the grade.}}
\CE{}\L{\LB{\C{}\V{\#} Input:       A letter grade.}}
\CE{}\L{\LB{\C{}\V{\#} Output:      None.}}
\CE{}\L{\LB{}}
\L{\LB{\V{\$a\_count}_=_0;}}
\L{\LB{\V{\$b\_count}_=_0;}}
\L{\LB{\V{\$c\_count}_=_0;}}
\L{\LB{\V{\$d\_count}_=_0;}}
\L{\LB{\V{\$f\_count}_=_0;}}
\L{\LB{}}
\L{\LB{\V{\$grade}_=_\<\V{STDIN}\>;}}
\L{\LB{\V{chomp}(\V{\$grade});}}
\L{\LB{\K{if}_((\V{\$grade}_\V{eq}_\S{}\'a\'\SE{})_\|\,\|_(\V{\$grade}_\V{eq}_\S{}\'A\'\SE{}))_\{}}
\L{\LB{____\V{\$a\_count}++;}}
\L{\LB{\}_\K{elsif}_((\V{\$grade}_\V{eq}_\S{}\'b\'\SE{})_\|\,\|_(\V{\$grade}_\V{eq}_\S{}\'B\'\SE{}))_\{}}
\L{\LB{____\V{\$b\_count}++;}}
\L{\LB{\}_\K{elsif}_((\V{\$grade}_\V{eq}_\S{}\'c\'\SE{})_\|\,\|_(\V{\$grade}_\V{eq}_\S{}\'C\'\SE{}))_\{}}
\L{\LB{____\V{\$c\_count}++;}}
\L{\LB{\}_\K{elsif}_((\V{\$grade}_\V{eq}_\S{}\'d\'\SE{})_\|\,\|_(\V{\$grade}_\V{eq}_\S{}\'F\'\SE{}))_\{}}
\L{\LB{____\V{\$d\_count}++;}}
\L{\LB{\}_\K{elsif}_((\V{\$grade}_\V{eq}_\S{}\'f\'\SE{})_\|\,\|_(\V{\$grade}_\V{eq}_\S{}\'F\'\SE{}))_\{}}
\L{\LB{____\V{\$f\_count}++;}}
\L{\LB{\}_\K{else}_\{}}
\L{\LB{____\K{print}(\S{}\"Invalid_grade_\$grade_entered\2n.\"\SE{});}}
\L{\LB{\}}}
\L{\LB{}}
\L{\LB{\V{\$grade}_=_\<\V{STDIN}\>;}}
\L{\LB{\V{chomp}(\V{\$grade});}}
\L{\LB{\K{if}_(\S{}\"\2U\$grade\"\SE{}_\V{eq}_\S{}\'A\'\SE{})_\{}}
\L{\LB{____\V{\$a\_count}++;}}
\L{\LB{\}_\K{elsif}_((\V{\$grade}_\V{eq}_\S{}\'b\'\SE{})_\|\,\|_(\V{\$grade}_\V{eq}_\S{}\'B\'\SE{}))_\{}}
\L{\LB{____\V{\$b\_count}++;}}
\L{\LB{\}_\K{elsif}_((\V{\$grade}_\V{eq}_\S{}\'c\'\SE{})_\|\,\|_(\V{\$grade}_\V{eq}_\S{}\'C\'\SE{}))_\{}}
\L{\LB{____\V{\$c\_count}++;}}
\L{\LB{\}_\K{elsif}_((\V{\$grade}_\V{eq}_\S{}\'d\'\SE{})_\|\,\|_(\V{\$grade}_\V{eq}_\S{}\'F\'\SE{}))_\{}}
\L{\LB{____\V{\$d\_count}++;}}
\L{\LB{\}_\K{elsif}_((\V{\$grade}_\V{eq}_\S{}\'f\'\SE{})_\|\,\|_(\V{\$grade}_\V{eq}_\S{}\'F\'\SE{}))_\{}}
\L{\LB{____\V{\$f\_count}++;}}
\L{\LB{\}_\K{else}_\{}}
\L{\LB{____\K{print}(\S{}\"Invalid_grade_\$grade_entered\2n.\"\SE{});}}
\L{\LB{\}}}
\endlgrinde\LGend
