Pass Object to Subroutine

#!/usr/bin/env perl
use strict;
use warnings;
use Data::Printer;
use Zabbix::Tiny;

my $url  = 'https://zabbix.server.com/zabbix/api_jsonrpc.php';
my $user = 'username';
my $pass = 'password';

my $api = Zabbix::Tiny->new(
    server   => $url,
    user     => $user,
    password => $pass,
);


my $host = host_get( 11000, $api );
p $host;





sub host_get {
    my $hostid = shift;
    my $api = shift;
    $api->do(
        'host.get', {
            output => [qw(hostid name host)],
            hostids => [$hostid],
        }
    );
};