Select Code to Download

use strict;
use warnings;
...
Kg
    return %hash;
}

zone "zone.com" {
    type slave;
...
        ip.perlmonks.ress.here 
            };
};

cnn.com -> cnn.add.ress.here
perlmonks.org -> ip.perlmonks.ress.here
zone.com -> ip.add.ress.here

/zone\s+"([^"]+)".+masters\s+{\s*([^}\s]+)\s*}/s
      ^ ^   ^   ^          ^   ^     ^     ^   ^
...
      | |   + - Match anything that's not a "
      | + - Begin quotation
      + - 1+ whitespaces