Ahoj, asi si příliš nerozumíme. Ve skriptu to samozřejmě funguje. Mě jde čistě komunikaci přes API... četl jsem, že snad fungují jen základní příkazy (takže žádné , nevím ale třeba dnešní verze to už umí). Nicméně nevím ani jakou metodu použít, zkoušel jsem cmd, talk... a i když podle debug výpisu příkaz skončí "done" (při chybě trap), nesmaže se vůbec nic.
my $mt = Mtik->new(host => $mtik_host, user => $mtik_username, pass => $mtik_password, debug=>0);
print "Logging in to MikroTik: $mtik_host\n";
if($mt->login())
{
my %attrs = ();
my @command = ('/ip/dhcp-server/lease/remove','id=5');
$mt->mtik_cmd(\@command);
# $attrs{'remove'} = "[ find ]";
# my($retval,@results) = $mt->mtik_cmd('/ip/dhcp-server/lease',\%attrs);
