"$ENV{DOCUMENT_ROOT}/98654a9b049de317d26eef66ad18f4ab/SAPE.pm" =~ /^(.+)$/;
require $1;
my $sape = new SAPE::Client(
user => '98654a9b049de317d26eef66ad18f4ab',
host => '<ИМЯ_ХОСТА>', # необязательно, по умолчанию: $ENV{HTTP_HOST}
charset => 'windows-1251', # необязательно, по умолчанию: windows-1251
);
print $sape->get_links;
ЗАРАБАТЫВАЙ С НАМИ ТОЛЬКО ПРОВЕРЕННЫЕ СПОСОБЫ!!!!!
Werbex