Examples of org.apache.oro.text.perl.Perl5Util.match()

Class org.apache.oro.text.perl.Perl5Util

Examples of org.apache.oro.text.perl.Perl5Util.match()

org.apache.oro.text.perl.Perl5Util.match()
Searches for the first pattern match somewhere in a character array taking a pattern specified in Perl5 native format:
```
 [m]/pattern/[i][m][s][x] 
```
The m prefix is optional and the meaning of the optional trailing options are:

i
case insensitive match
m
treat the input as consisting of multiple lines
s
treat the input as consisting of a single line
x
enable extended expression syntax incorporating whitespace and comments
As with Perl, any non-alphanumeric character can be used in lieu of the slashes.
If the input contains the pattern, the org.apache.oro.text.regex.MatchResult can be obtained by calling {@link #getMatch()}. However, Perl5Util implements the MatchResult interface as a wrapper around the last MatchResult found, so you can call its methods to access match information.
@param pattern The pattern to search for. @param input The char[] input to search. @return True if the input contains the pattern, false otherwise. @exception MalformedPerl5PatternException If there is an error inthe pattern. You are not forced to catch this exception because it is derived from RuntimeException.

        }


        Perl5Util matchUrlPat = new Perl5Util();
        Perl5Util matchAsciiPat = new Perl5Util();


        if (!matchAsciiPat.match(LEGAL_ASCII_PATTERN, value)) {
            return false;
        }


        // Check the whole url address structure
        if (!matchUrlPat.match(URL_PATTERN, value)) {

View Full Code Here

            return false;
        }


        Perl5Util pathMatcher = new Perl5Util();


        if (!pathMatcher.match(PATH_PATTERN, path)) {
            return false;
        }


        //if (path.endsWith("/")) {
        //    return false;

View Full Code Here

              
              // Replace singe quote's with double quotes (only if they match)
              String subquery = util.substitute("s/\'(.*)\'/\"$1\"/g", field.getQuery());
              
              // If the field is not quoted ...
              if (!util.match("/\".*\"/", subquery))
                {
                // ... then seperate each word and re-specify the search field.
                    subquery = util.substitute("s/ / " + field.getField() + ":/g", subquery);
                }

View Full Code Here

    public void testFindScript()
    {
        Perl5Util util = new Perl5Util();
        String expr = "/(?:<script.*?>)((\\n|.)*?)(?:<\\/script>)/";
        
        assertTrue(util.match(expr, JAVASCRIPT_NOCOMMENT));
        
        MatchResult result = util.getMatch();
        assertNotNull(result);
        assertEquals(3, result.groups());
        assertEquals("if (document.updateObject) { document.updateObject.progressFinished('updateId');}",

View Full Code Here

    public void testFindMultipleScripts()
    {
        Perl5Util util = new Perl5Util();
        String expr = "/(?:<script.*?>)((\\n|.)*?)(?:<\\/script>)/";
        
        assertTrue(util.match(expr, MULTI_JAVASCRIPT_NOCOMMENT));
        
        MatchResult result = util.getMatch();
        assertNotNull(result);
        assertEquals(3, result.groups());
        assertEquals("if (document.updateObject) { document.updateObject.progressFinished('updateId');}"

View Full Code Here

        {
            contents = perl.substitute(makeSubstRE(i), contents);
        }


        // Convert closing curlies.
        if (perl.match("m/javascript/i", contents))
        {
            // ASSUMPTION: JavaScript is indented, WM is not.
            contents = perl.substitute("s/\n}/\n#end/g", contents);
        }
        else

View Full Code Here

        if (email == null) {
            return false;
        }


        Perl5Util matchAsciiPat = new Perl5Util();
        if (!matchAsciiPat.match(LEGAL_ASCII_PATTERN, email)) {
            return false;
        }


        // Check the whole email address structure
        Perl5Util emailMatcher = new Perl5Util();

View Full Code Here

            return false;
        }


        // Check the whole email address structure
        Perl5Util emailMatcher = new Perl5Util();
        if (!emailMatcher.match(EMAIL_PATTERN, email)) {
            return false;
        }


        if (email.endsWith(".")) {
            return false;

View Full Code Here

     */
    protected boolean isValidDomain(String domain) {
        boolean symbolic = false;
        Perl5Util ipAddressMatcher = new Perl5Util();


        if (ipAddressMatcher.match(IP_DOMAIN_PATTERN, domain)) {
            if (!isValidIpAddress(ipAddressMatcher)) {
                return false;
            }
        } else {
            // Domain is symbolic name

View Full Code Here

                return false;
            }
        } else {
            // Domain is symbolic name
            Perl5Util domainMatcher = new Perl5Util();
            symbolic = domainMatcher.match(DOMAIN_PATTERN, domain);
        }


        if (symbolic) {
            if (!isValidSymbolicDomain(domain)) {
                return false;

View Full Code Here

0 1 2 3 4 5 6 7 8 9

TOP

All source code are property of their respective owners. Java is a trademark of Sun Microsystems, Inc and owned by ORACLE Inc. Contact coftware#gmail.com.