my @hosts =  map q|192.168.| . $_, 1..254;
 
for (@hosts){
  print "$_\n";
}
~