sample data....

Status Host Pluto up
Host System Pluto 10.1.4.11
Host System Mars IP 10.1.3.10
Status Host Jupiter down
Host System #neptune IP 10.10.10.10
Disk load Mars imminent
Host System Venus IP 12.1.2.13.14

......

##</code><code>##

 Host System #neptune IP 10.10.10.10

##</code><code>##

Host System Pluto 10.1.4.11
Host System Mars IP 10.1.3.10
Host System Venus IP 12.1.2.13.14

##</code><code>##

if $text =~ /Host System (?!#)/ next;