/[pxelator]/lib/PXElator/t/ip.t
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /lib/PXElator/t/ip.t

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 413 by dpavlin, Wed Sep 9 14:27:02 2009 UTC revision 456 by dpavlin, Sat Jan 2 15:49:09 2010 UTC
# Line 4  use warnings; Line 4  use warnings;
4  use strict;  use strict;
5  use autodie;  use autodie;
6    
7  use Test::More tests => 12;  use Test::More tests => 13;
8  use Data::Dump qw/dump/;  use Data::Dump qw/dump/;
9    
10  use_ok 'ip';  use_ok 'ip';
# Line 31  $ip_in_range = ip::from_int($ip_in_range Line 31  $ip_in_range = ip::from_int($ip_in_range
31    
32  ok(   ip::in_dhcp_range( $ip_in_range ), "in_dhcp_range $ip_in_range" );  ok(   ip::in_dhcp_range( $ip_in_range ), "in_dhcp_range $ip_in_range" );
33  ok( ! ip::in_dhcp_range( '4.2.2.2' ), 'not in_dhcp_range' );  ok( ! ip::in_dhcp_range( '4.2.2.2' ), 'not in_dhcp_range' );
34    
35    my $force_dhcp_ip = '10.60.0.200';
36    ok(   ip::in_dhcp_range( $force_dhcp_ip ), "force in_dhcp_range $force_dhcp_ip" );
Legend:
Removed from v.413  
changed lines
  Added in v.456
  ViewVC Help
Powered by ViewVC 1.1.26