Select Code to Download

print "I will calculate whatever\n",
      "you specify according to\n",
...

my $i = 0;
....

#!/usr/bin/perl -w
use strict;
...
       print "illegal entry!\n";
    }   
}

#!/usr/bin/perl -w
use strict;
...
3. is an illegal entry
4.0 amps
10ba is an illegal entry

prompt>    i  =  2.3
prompt> t=3
...
i=3
prompt>q
good bye!

#!/usr/bin/perl -w
use strict;
...
       print "illegal syntax!\n";
    }    
}