Thread: [SOLVED] Perl Programming, Im trying to write a basic-ish perl program asking for
View Single Post
  #2 (permalink)  
Old 06-10-2007, 05:17 PM
JakeCigar JakeCigar is offline
Novice
Join Date: Jun 2007
Posts: 14
iTrader: (0)
JakeCigar is on a distinguished road
maybe a regular expression will help.

while(<STDIN>){
print /^(Mr.|Mrs.|Ms.)/ ? 'ok' : 'NOT OK', ' - ';
print $_;
};

__________________
Powered by Yahoo! Answers
Digg this Post! Del.Icio.Us this Post! Technorati this Post! Furl this Post! Mister Wong this Post! Newsvine this Post! Spurl this Post! Reddit this Post! Netscape this Post!