Re: simple loop


good chemistry is complicated, and a little bit messy -LW
	PerlMonks

Re: simple loop

by jweed (Chaplain)

on Mar 24, 2004 at 03:37 UTC ( [id://339286]=note: print w/replies, xml )

Need Help??

in reply to simple loop

Smells a wee bit like homework, but try:

LOOP: {
    $choice = <STDIN>;
    if ($choice == 1)
    {
        &hash1;
    }
    elsif ($choice == 2)
    {
        &hash2;
    }
    elsif ($choice == 3)
    {
        &hash3;
    }
    else
    {
        print "ERROR: Please type in either 1, 2 or 3.\n";
        redo LOOP;
    }
}
[download]

Code is (almost) always untested.
http://www.justicepoetic.net/