while (my $iphostname = <$fh>) {
    print $iphostname if $iphostname =~ /^object-group/ .. $iphostname =~ /.../;