Hi all,
I write a small script as follows:
use strict;
use warnings;
my $file_name='OT-q1.001';
if ($file_name=~/(OT)*.(\d+$)/){
print "find it\t $file_name";
}else {print "No math";}
The problem is that it also macth the following
string:
my $file_name='I:/Common/Notebooks/Trans10C.032';
(ot in the Notebook)
Any help will be appreciated.
Li
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
