Re: Net:Addr


go ahead... be a heretic
	PerlMonks

Re: Net:Addr

by fokat (Deacon)

Log in
Create a new user
The Monastery Gates
Seekers of Perl Wisdom
Meditations
Cool Uses For Perl
Obfuscation
Q&A
Tutorials
Poetry
Reviews
Perl News
Donate
Recent Threads
Newest Nodes
Super Search
PerlMonks Discussion
What's New

on Dec 05, 2004 at 01:52 UTC ( #412446=note: print w/replies, xml )

Need Help??

in reply to Net:Addr

Hi there:

Of course I am biased, but how about... (untested)

use strict;
use warnings;

use vars qw($is_this_an_IP_address); 
use NetAddr::IP;

my $ip = new NetAddr::IP $is_this_an_IP_address;

if ($ip)
{
  # This is a valid IP address, or something an IP address can be deri
+ved
  # from
}
else
{
  # This is not an IP address
}
[download]

Best regards

-lem, but some call me fokat