Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use warnings;
...
        hostgroups                   LINUX,GRID,RMAN,CRIT
        }
  2. or download this
    $VAR1 = {
          'denlas02' => [
...
                        ]
        };
  3. or download this
     for my $val ( keys %host_add ) {
    for ( @{ $host_add{$val} } ) {
...
          if $_ =~ m{CRIT|DMZ};
    }
}
  4. or download this
    denlas02 146.xxx.xxx.xxx LINUX,DEN,DMZ 
ppplas12 10.50.33.26 LINUX,GRID,RMAN,CRIT