Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"

Re: Regular expression matching when it shouldn't

by OeufMayo (Curate)
on Aug 15, 2001 at 13:30 UTC ( #104999=note: print w/replies, xml ) Need Help??

in reply to Regular expression matching when it shouldn't

Your regular expression does match because it is really present inside the string:
"[someRandomName]." (The text in bracket is the matched text)

What you want is anchoring the regular expression. Try adding a '^' at the beginning and a '$' at the end of the regular expression. The Regex will then try to match against the whole string, and not only on a part of it:


Hope this helps. See perlre for more infos about this

#!/usr/bin/perl -w use strict; my $domain = $ARGV[0]; print "Got $domain\n"; if ($domain =~ /^[A-Z0-9]+[A-Z0-9-]+[A-Z0-9]$/i) { print "$domain matched\n\n"; } else { print "$domain did not match\n\n"; } __END__ Got someRandomName. someRandomName. did not match Got someRandomName- someRandomName- did not match Got someRandomName someRandomName matched Got someRandomName-X someRandomName-X matched Got someRandomName-Foo someRandomName-Foo matched
my $OeufMayo = new PerlMonger::Paris({http => ''});</kbd>

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://104999]
[Corion]: Oooh. Tinc really looks good. It seems that it could even be used to link up (a segment of) my home network with (a segment of) a friends network, to create a private network over the internet
[marto]: fun times :)

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (9)
As of 2018-01-17 14:59 GMT
Find Nodes?
    Voting Booth?
    How did you see in the new year?

    Results (201 votes). Check out past polls.