Regexp::Common::URI::telnet -- Returns a pattern for telnet URIs. use Regexp::Common qw /URI/; while (<>) { /$RE{URI}{telnet}/ and print "Contains a telnet URI.\n"; }

$RE{URI}{telnet}
Returns a pattern that matches telnet URIs, as defined by RFC 1738. Telnet URIs have the form: "telnet:" "//" [ user [ ":" password ] "@" ] host [ ":" port ] [ "/" ] Under "{-keep}", the following are returned: The complete URI. The scheme. The username:password combo, or just the username if there is no password. The username, if given. The password, if given. The host:port combo, or just the host if there's no port. The host. The port, if given. The trailing slash, if any. Berners-Lee, Tim, Masinter, L., McCahill, M.: Uniform Resource Locators (URL). December 1994. $Log: telnet.pm,v $ Revision 2.100 2003/02/10 21:06:43 abigail telnet URI Regexp::Common::URI for other supported URIs. Damian Conway (damian@conway.org) This package is maintained by Abigail (regexp-common@abigail.nl). Bound to be plenty. Copyright (c) 2001 - 2003, Damian Conway. All Rights Reserved. This module is free software. It may be used, redistributed and/or modified under the terms of the Perl Artistic License (see http://www.perl.com/perl/misc/Artistic.html)