ltm-fragile-uri

use Test;
use IETF::RFC_Grammar::URI;

grammar IETF::RFC_Grammar::URI::slightly-better is IETF::RFC_Grammar::URI {
    # just change <digit> to [0..9]
    token uri-alphanum      { <+uri-alpha +[0..9]> }
}

# By luck the existing code finds an IP address for host
is IETF::RFC_Grammar::URI.parse(
    '1.2.3.4', :rule<host>
).keys[0], 'IPv4address', 'Existing grammar happens by luck to work';

# LTM seems too fragile.  A small change for the better results
# in parse as registered domain name.
is IETF::RFC_Grammar::URI::slightly-better.parse(
    '1.2.3.4', :rule<host>
).keys[0], 'IPv4address',
    'Match with small and valid change fails apparently caused by LTM';