Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

Re: Re: Re: Two-dimensional match/regex?

by osfameron (Hermit)
on May 22, 2002 at 12:43 UTC ( [id://168411]=note: print w/replies, xml ) Need Help??


in reply to Re: Re: Two-dimensional match/regex?
in thread Two-dimensional match/regex?

Yes, I agree that it matches. But also:
my $target = q{ MM oo < -/ /^\ : C : 8===8 |^| ||| -~-~ }; print "Match!\n" if ($target =~ /\/\^\\\n.+C/m);
also produces "Match!", which it shouldn't.

Also,

my $target=q { MM oo < - ^ ^ /^\ @ @ : C : ( o ) 8===8 `+' |^| O-X-O ||| / \ -~-~ O O }; print "Match!\n" if ($target =~ /\/\^\\\n.+C/m);
doesn't match.

The regex doesn't therefore meet the specification of finding one Ascii picture within a larger picture!

Cheerio!
Osfameron
http://osfameron.perlmonk.org/chickenman/

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://168411]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others admiring the Monastery: (4)
As of 2024-04-25 22:30 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found