Hi, I wanted to do this in a better Perlish Way:

my $Range1 = $1 . ($2 + 10) if $IPREAL[0] =~ /^(.*\.)(.+)$/;
my $Range2 = $1 . ($2 + 10) if $IPREAL[1] =~ /^(.*\.)(.+)$/;
my $newline2=  "subnet $IP[0] netmask 255.255.255.0{range dynamic-bootp 
$IPREAL[0] $Range1;}";
my $newline3=  "subnet $IP[1] netmask 255.255.255.0{range dynamic-bootp 
$IPREAL[1] $Range2;}";
        
        
 Thanks.       
        
        


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to