ok thanks!





Lawrence Statton <[EMAIL PROTECTED]>
Sent by: [EMAIL PROTECTED]
12/07/2004 12:08 PM
Please respond to Lawrence Statton

 
        To:     [EMAIL PROTECTED]
        cc:     [EMAIL PROTECTED]
        Subject:        Re: ip4 check


> --=_alternative 005C6D8D85256F63_=
> Content-Type: text/plain; charset="us-ascii"
> 
> All, 
> 
> Did anyone have any ideas.... I only received one response!  Thanks
> 
> I have having issues using this module I installed.  The module is 
> Net::IPv4Addr.
> 
> Here is my code
> 
> use strict;
> use warnings;
> use diagnostics;
> use Net::IPv4Addr qw( :all );
> 
> my $var = "23.23.109.103";
> print "$var\n";
> 
> #if ($var =~ m/^\d+$/) {
> #if ($var !~ /\D/) {
> 
> if ( $var = ipv4_checkip ($var)) {
>         print "your variable is a number $var\n";
> } else {
>         print "number $var is not a number\n";
> }

1) Read perldoc Net::IPv4Addr

2) change ipv4_checkip to ipv4_chkip 



-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
                 Lawrence Statton - [EMAIL PROTECTED] s/aba/c/g
Computer  software  consists of  only  two  components: ones  and
zeros, in roughly equal proportions.   All that is required is to
sort them into the correct order.


Reply via email to