in reply to Interactive Perl script

Try this one out, and there is many other ways to do it 

print "Can you write device drivers?";
my $answer =<>;
chomp;
if($answer=~/\byes\b/i){
        print "Wow, you must be very skilled\n";
        }else{
                print "Neither can I....";
                }

[download]
Excellence is an Endeavor of Persistence. Chance Favors a Prepared Mind.

In Section Seekers of Perl Wisdom