Select Code to Download

if($line =~ m/ on $ipaddress/)
    {
...
            print "$line\n";
        }
    }

if($line =~ m/ on $ipaddress/)
    {
...
        }
        
    }