Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- # This is incomplete code!
- use Modern::Perl '2012'; # strict, warnings, 5.010_000;
- use Zabbix::API;
- use Zabbix::API::Item qw/:status_types/;
- my $api = Zabbix::API->new(...);
- ...
- $api->fetch(
- 'Item',
- params => {
- filter => { status => ITEM_STATUS_NOTSUPPORTED },
- selectItemDiscovery => 'extend',
- },
- );
- for my $item (@{$items}) {
- next unless $item->data()->{itemDiscovery}; # only process lld items
- print $item->data()->{name}, "\n";
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement