You should try something, as castaway suggested, we are not here to do your homework.

Anyhow it is not appreciated in this forum.

If i understood your question correctly, this should work.

for $c (0..255)
{
    for $t (1..254)
    {
    $a= "192.168.".$c.".".$t;
    push (@a , $a);
    }
}
$"= "\n";
print "@a";
[download]

updated: