Select Code to Download

sub is_config_new {
        my $fn = shift;
...
        if( $taint == 1 ) {
            # print a conflict page
        } else { return; } # return to proceed with config

        foreach $host (keys %hosts){
                print "<tr><td>$host</td>";
...
                        print "<td align=center><img src=/nagios/image
+s/greendot2.gif border=0></td></tr>";
                } else {print "<td align=center><img src=/nagios/image
+s/reddot.gif border=0></td></tr>"; }
        }