add Zabbix TriggerDependencies(trigger2->trigger1) by ZabbixAPI.pm

gistfile1.pl

#!/usr/bin/perl
use strict;
use warnings;
use utf8;
use Data::Dumper;
use ZabbixAPI;

my $user       = "<user>";
my $password   = "<password>";

my $za = ZabbixAPI->new("http://127.0.0.1/zabbix/");
$za->auth($user, $password);

my $trigger1 = $za->trigger_get({
  filter => {
    "host" => ["test01"],
    "description" => ["trigger01"]
  },
  select_dependencies => "extend",
#  output => "extend"
})->[0];
print Dumper $trigger1;

my $trigger2 = $za->trigger_get({
  filter => {
    "host" => ["test01"],
    "description" => ["trigger02"]
  },
  select_dependencies => "extend",
#  output => "extend"
})->[0];
print Dumper $trigger2;

unless(@{$trigger2->{dependencies}}){
  print "add dependency\n";
  my $result = $za->trigger_addDependencies(
    [
      {
        triggerid => $trigger2->{triggerid},
        dependsOnTriggerid => $trigger1->{triggerid}
      }
    ]
  );
  print Dumper $result;
}