validate::net(3pm) [debian man page]
Validate::Net(3pm) User Contributed Perl Documentation Validate::Net(3pm) NAME
Validate::Net - Format validation for Net:: related strings SYNOPSIS
use Validate::Net; my $good = '123.1.23.123'; my $bad = '123.432.21.12'; foreach ( $good, $bad ) { if ( Validate::Net->ip( $_ ) ) { print "'$_' is a valid ip "; } else { print "'$_' is not a valid ip address because: "; print Validate::Net->reason . " "; } } my $checker = Validate::Net->new( 'fast' ); unless ( $checker->host( 'foo.bar.blah' ) ) { print "You provided an invalid host"; } DESCRIPTION
Validate::Net is a class designed to assist with the validation of internet related strings. It can be used to validate CGI forms, internally by modules, and in any place where you want to check that an internet related string is valid before handing it off to a Net::* modules. It allows you to catch errors early, and with more detailed error messages than you are likely to get further down in the Net::* modules. Whenever a test is false, you can access the reason through the "reason" method. METHODS
host $host The "host" method is used to see if a value is a valid host. That is, it is either a domain name, or an ip address. domain $domain [, @options ] The "domain" method is used to check for a valid domain name according to RFC 1034. It additionally disallows two consective dashes 'foo--bar'. I've never seen it used, and it's probably a mistaken version of 'foo-bar'. Depending on the options, additional checks may be made. No options are available at this time ip $ip The "ip" method is used to validate the format, of an ip address. If called with no options, it will just do a basic format check of the ip, checking that it conforms to the basic dotted quad format. Depending on the options, additional checks may be made. No options are available at this time port $port The "port" method is used to test for a valid port number. BUGS
Unknown TO DO
This module is not all that completed. Just enough to do some basics. Feel free to send me patches to add anything you like. Add support for networks Add "exists" support Add "dns" support for host names SUPPORT
Bugs should be reported via the CPAN bug tracking system <http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Validate-Net> For other inquiries, contact the author AUTHOR
Adam Kennedy <adamk@cpan.org> SEE ALSO
Net::* COPYRIGHT
Copyright 2002 - 2008 Adam Kennedy. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. The full text of the license can be found in the LICENSE file included with this module. perl v5.10.0 2008-06-03 Validate::Net(3pm)
Check Out this Related Man Page
Log::Handler::Output::Email(3pm) User Contributed Perl Documentation Log::Handler::Output::Email(3pm) NAME
Log::Handler::Output::Email - Log messages as email (via Net::SMTP). SYNOPSIS
use Log::Handler::Output::Email; my $email = Log::Handler::Output::Email->new( host => "mx.bar.example", hello => "EHLO my.domain.example", timeout => 120, debug => 0, from => 'bar@foo.example', to => 'foo@bar.example', subject => "your subject", buffer => 0 ); $email->log(message => $message); DESCRIPTION
With this output module it's possible to log messages via email and it used Net::SMTP to do it. The date for the email is generated with "Email::Date::format_date". Net::SMTP is from Graham Barr and it does it's job very well. METHODS
new() Call "new()" to create a new Log::Handler::Output::Email object. The following opts are possible: host With this option you has to define the SMTP host to connect to. host => "mx.host.com" # or host => [ "mx.host.example", "mx.host-backup.example" ] hello Identify yourself with a HELO. The default is set to "EHLO BELO". timeout With this option you can set the maximum time in seconds to wait for a response from the SMTP server. The default is set to 120 seconds. from The sender address (MAIL FROM). to The receipient address (RCPT TO). Additional options are cc and bcc. subject The subject of the mail. The default subject is "Log message from $progname". buffer This opts exists only for security. The thing is that it would be very bad if something wents wrong in your program and hundreds of mails would be send. For this reason you can set a buffer to take care. With the buffer you can set the maximum size of the buffer in lines. If you set buffer => 10 then 10 messages would be buffered. Set "buffer" to 0 if you want to disable the buffer. The default buffer size is set to 20. debug With this option it's possible to enable debugging. The information can be intercepted with $SIG{__WARN__}. log() Call "log()" if you want to log a message as email. If you set a buffer size then the message will be pushed into the buffer first. Example: $email->log(message => "this message will be mailed"); If you pass the level then its placed into the subject: $email->log(message => "foo", level => "INFO"); $email->log(message => "bar", level => "ERROR"); $email->log(message => "baz", level => "DEBUG"); The lowest level is used: Subject: ERROR: ... You can pass the level with "Log::Handler" by setting message_pattern => '%L' flush() Call "flush()" if you want to flush the buffered lines. sendmail() Call "sendmail()" if you want to send an email. The difference to "log()" is that the message won't be buffered. validate() Validate a configuration. reload() Reload with a new configuration. errstr() This function returns the last error message. DESTROY
"DESTROY" is defined and called "flush()". PREREQUISITES
Carp Email::Date Net::SMTP Params::Validate EXPORTS
No exports. REPORT BUGS
Please report all bugs to <jschulz.cpan(at)bloonix.de>. If you send me a mail then add Log::Handler into the subject. AUTHOR
Jonny Schulz <jschulz.cpan(at)bloonix.de>. COPYRIGHT
Copyright (C) 2007-2009 by Jonny Schulz. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. perl v5.14.2 2012-11-21 Log::Handler::Output::Email(3pm)