Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> API Plesk добавить поддомен 
:(
    Опции темы
gcc
Дата 12.7.2010, 08:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Агент алкомафии
****


Профиль
Группа: Участник
Сообщений: 2691
Регистрация: 25.4.2008
Где: %&й

Репутация: 1
Всего: 17



нашел модуль:
http://search.cpan.org/~nrg/API-Plesk-1.09...omainAliases.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 
какая-то путальница... блин...




Это сообщение отредактировал(а) gcc - 13.7.2010, 00:29
PM WWW ICQ Skype GTalk Jabber   Вверх
MaXL
Дата 17.7.2010, 17:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Developer
**


Профиль
Группа: Участник
Сообщений: 380
Регистрация: 24.10.2005
Где: Владивосток

Репутация: нет
Всего: 2



Цитата

а через обычный 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

Это сообщение отредактировал(а) MaXL - 17.7.2010, 18:01


--------------------
MaXL
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0566 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.