the code is listed here
$logger->info("create zone on the switch $ip using zonecreate");
($out,$err) = $ssh->capture2("zonecreate ");
$ssh->error and
 die "remote find command failed: $!" . $ssh->error;
print "$out\n";
$logger->info("zonecreate successful");


##</code><code>##

the output
2015/07/26 22:14:52 create zone on the switch 10.227.0.216 using zonecreate
Error: Invalid number of arguments

Usage:
zonecreate "zoneName", "member[; member...]"
zonecreate --peerzone "zone_name" -principal "principal_list" [-members "member_list"]

2015/07/26 22:14:53 zonecreate successful