Ok I am beating my head why this is not working...
$fname = <STDIN>;
chomp $fname;
$fletter = substr($fname,0,1);
# now we have the first letter of the first name
if ( $fletter =~ /[a-f]/i) {
print "First letter is a-f\n";
}
You get the picture I would have other if's based on the first letter
however my regex is not working any idea I just need another prospective on
it.
Richie Crews
Unix Systems Administrator
(706) 773 - 3436 CELL
(706) 634 - 3681 DESK
(706) 634 - 3831 FAX
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Disclaimer: Any errors in spelling, tact, or fact are transmission errors
and not the fault of the sender.
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
