Harold Castro wrote:
> Hi,
Hello,
> Can you tell me why this loop doesn't work???
>
> #!/usr/local/bin/perl
> use warnings;
> use strict;
>
> our $hostpart = 1;
> our $networkpart = 128;
> $|=1;
>
> while ($networkpart <= 158){
> while ($hostpart <= 256){
> print "202.90.".$networkpart.".".$hostpart, "\n";
> ++$hostpart;
> }
> ++$networkpart;
> }
>
> It only prints the range from 202.90.128.0 - 202.90.128.256.
> I want it print upto 202.90.158.256.
You need to have two nested loops:
for my $networkpart ( 128 .. 158 ) {
for my $hostpart ( 1 .. 256 ) {
print "202.90.$networkpart.$hostpart\n";
}
}
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
