create_user_3 in a perl script

You've got a few too many brackets in your UserInfo structure. By putting brackets around all parameters you are turning them all into arrays. Also, for a boolean, you'll have to use either 0 or 1.

Give this a shot:

sub handle_create()
{
  my ($UserName, $FullName, $Role, $Partition ) = @_;

  if ( $UserName eq "" ) { $UserName = "testuser1"; }
  if ( $FullName eq "" ) { $FullName = "New User"; }
  if ( $Role eq "" ) { $Role = USER_ROLE_GUEST ; }
  if ( $Partition eq "" ) { $Partition = "Common" ; }

  $Password = {
    is_encrypted => 0,
    password => ""
  };

  $UserID = {
    name => $UserName,
    full_name => $FullName
  };

  $UserPermissions = {
    role => $Role,
    partition => $Partition
  };

  $UserInfo = {
    user => $UserID,
    password => $Password,
    permisisions => [$UserPermissions],
    login_shell => "",
  };

  $soapResponse = $UserManagement->create_user_3(
    SOAP::Data->name(users => [$UserInfo])
  );
};

Notice, I've removed the "login_shell" parameter as USER_ROLE_GUEST doesn't have the access to specify a custom shell.

-Joe