Can we see a little more of the code? :o)
Doug
-----Original Message-----
From: Richie Crews [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, July 18, 2001 11:43 AM
To: Richie Crews; [EMAIL PROTECTED]
Subject: RE: Ok brain fart here...
Ok my problem is something not shown in the code... I was using a my $exch =
"ICWPEX01" for each if statement and the my's seemed to be canceling it
out...
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.
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
-----Original Message-----
From: Richie Crews [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, July 18, 2001 11:27 AM
To: [EMAIL PROTECTED]
Subject: Ok brain fart here...
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.
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
