define host{
   use                                  HALF
   host_name                      denlas02
   alias                                denlas02
   address                           146.xxx.xxx.xxx
   hostgroups                      LINUX,DEN,DMZ
}

define host{
        use                             HALF
        host_name                 ppplas11
        alias                            ppplas11
        address                       10.xxx.xxx.xxx
        hostgroups                 LINUX,PPO,ORAPRD
        }

define host{
        use                               ALIVE
        host_name                   ppplas12
        alias                              ppplas12
        address                        10.50.33.26
        hostgroups                   LINUX,GRID,RMAN,CRIT
        }

##</code><code>##

#!/usr/local/bin/perl
use strict;
use warnings;
my $file = 'hosts.cfg';
open (MYHOSTS, $file);
while (<MYHOSTS>) {
  my @hosts = split(/\n\n/);
  foreach my $host (@hosts) {
        print if ('$host' =~ m/(GRID)/);
        print if grep(/RMAN/, $host);
      }
}
close (MYHOSTS);