# t_domains inventory my @domains = cast2db::Class_t_domains->inventory('10.10.1.50'); my $obj; foreach (@domains) { $obj = cast2db::Class_t_domains->retrieve($_); print $obj->domain; }