use ZCS::Admin;                                                                 
                                                                                
my $zimbra = ZCS::Admin->new(                                                   
    proxy    => 'https://host.domain.tld7071/service/admin/soap/',    
    name     => 'admin',                                                        
    password => 'password',                                                     
);                                                                              
                                                                                
die ZCS::Admin->faultinfo($zimbra) if !$zimbra;                                 
                                                                                
my $accountinfo = $zimbra->getaccount( name => "username\@domain\.tld" );    

print $accountinfo, "\n";