my $accountType = delete $args{'accountType'};
my $externalFlag = delete $args{'externalFlag'};
$args{'AccessModes'} = [ split(' ', $args{'AccessModes'}) ];
- @args = ( accountName => $accountName, [
- settings => \%args,
- accountType => $accountType,
- externalFlag => $externalFlag, ] );
+ @args = ( accountName => $accountName,
+ accountType => $accountType,
+ settings => \%args,
+ );
+ #externalFlag => $externalFlag,
+ push @args, externalFlag => $externalFlag if $externalFlag;
communigate_pro_command( $machine, $port, $login, $password, $method, @args );