Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Perl: Общие вопросы > API Plesk добавить поддомен

Автор: gcc 12.7.2010, 08:28

нашел модуль:
http://search.cpan.org/~nrg/API-Plesk-1.09/lib/API/Plesk/DomainAliases.pm

вроде бы все сделал

Код


#!/usr/bin/perl



use API::Plesk;

#use API::Plesk::Response;

use API::Plesk::DomainAliases;

use Data::Dumper;


my ($plesk_ver, $plesk_user, $plesk_pass, $plesk_url) = qw(1.5.0.0 user pass https://s.s.com/login_up.php3);


my ($domain, $username, $ftp_user, $ftp_pass, $ip, $dom_template) = ($ARGV[0], $ARGV[1], $ARGV[2], $ARGV[3], $ARGV[4], $ARGV[5]);


my $plesk_client = API::Plesk->new('api_version'=>$plesk_ver,'username'=>$plesk_user,'password'=>$plesk_pass,'url'=>$plesk_url,'debug'=>'1','request_debug'=>'1' );

#print Dumper $plesk_client;

 my $res = $plesk_client->DomainAliases->create(
    domain_name  => 'v.com',
 );

#    my $res = $plesk_client->Func_Module->operation_type(%params);

 print Dumper $res;


#   print $res->is_success;
    
   # my $a = $res->get_data; # return arr ref of answer blocks
   
#   print $a;
    

$res->is_success ? my $userid = $res->get_data->[0]{'id'} : print $res->get_error_string, " \n";

print $userid;

но отвичает:

Код


plesk_query: blank request

означает то что ничего не возвратило....

может я где-то ошибся...?

а через обычный LWP можно это сделать, чтобы авторизироватся, сохранить куки и добавить....?
(я это делал, только вот про Plesk не знаю, не вижу куда (и как) указать домен к которому добавляю поддомен...)

вот есть другие примеры http://forum.parallels.com/pda/index.php/t-81079.html
какая-то путальница... блин...

Автор: MaXL 17.7.2010, 17:59

Цитата

а через обычный LWP можно это сделать, чтобы авторизироватся, сохранить куки и добавить....?
(я это делал, только вот про Plesk не знаю, не вижу куда (и как) указать домен к которому добавляю поддомен...)

При нажатии на кнопку "добавить поддомен", происходит POST запрос по адресу:
https://server/plesk/client@1/domain@2/hosting/subdomains/subdomain@new/properties/
где 1 и 2 id`шник клиента и домена соответственно.
Ну и POST поля такие:

Цитата

cmd    update
lock    true
previous_page
wizstep    1
wizard    /plesk/client@1/domain@2/hosting/subdomains/subdomain@new/properties/
wizaction    finish
displayName    test
sys_user_type    main
php_handler_type    module
login_
passwd_
confirm_
quota_
manage_subdomains    true

За что они отвечают я думаю выяснить не сложно.
Ну а как работать с LWP по HTTPS, я думаю гугл поможет smile