"Cai, Lucy (L.)" <[EMAIL PROTECTED]> graced perl with these words of wisdom:
> return (($Output =~ /.*\(ucmvob\)/s*$/) ? 1 : 0); > > } > ********************************************************************** > > $Output ="/vobs/na_mscs_pvob > /ccstore/ecc/vobs_fcis321/na_mscs_pvob.vbs public (ucmvob,replicated)" > > What I want to do is if this tring include word "ucmvob", then return 1, > else return 0. If I understand your code correctly, you're looking for the string "(ucmvob)" -- note that you don't have anything in your regex between the b and the escaped close partentheses. In $Output, that string doesn't exist, as the b in ucmvob is followed by a comma. -- Ted <fedya at bestweb dot net> Oh Marge, anyone can miss Canada, all tucked away down there.... --Homer Simpson _______________________________________________ Perl-Win32-Users mailing list [email protected] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
