Regexp::Common::URI::wais -- Returns a pattern for WAIS URIs.
use Regexp::Common qw /URI/; while (<>) { /$RE{URI}{WAIS}/ and print "Contains a WAIS URI.\n"; }
Returns a pattern that matches WAIS URIs, as defined by RFC 1738. WAIS URIs have the form:
"wais:" "//" host [ ":" port ] "/" database [ ( "?" search ) | ( "/" wtype "/" wpath ) ]
Under {-keep}
, the following are returned:
$Log: wais.pm,v $ Revision 2.102 2008/05/23 21:30:10 abigail Changed email address Revision 2.101 2008/05/23 21:28:02 abigail Changed license Revision 2.100 2003/03/12 22:23:14 abigail Forced 2.100 revision Revision 2.1 2003/03/12 22:22:21 abigail WAIS URIs.
Regexp::Common::URI for other supported URIs.
Damian Conway (damian@conway.org)
This package is maintained by Abigail (regexp-common@abigail.be).
Bound to be plenty.
This software is Copyright (c) 2001 - 2008, Damian Conway and Abigail.
This module is free software, and maybe used under any of the following licenses:
1) The Perl Artistic License. See the file COPYRIGHT.AL. 2) The Perl Artistic License 2.0. See the file COPYRIGHT.AL2. 3) The BSD Licence. See the file COPYRIGHT.BSD. 4) The MIT Licence. See the file COPYRIGHT.MIT.