Мейсон, как звонить вне WEB API

Question

Я использую Мейсон для вызова API(веб-интерфейс, я могу использовать GET для его вызова), чтобы можно было вернуть файл json.

я знаю m->comp() можно использовать внутри. Но какую функцию можно использовать внешне?

Answer 1

Похоже, вы хотите сделать http-запрос на внешний URL-адрес. Поскольку вы просто встраиваете perl в html, вы можете просто иметь блок perl, который использует HTTP:: Request и LWP::UserAgent для выполнения этого запроса. Что-то вроде этого:

my $ua = LWP::UserAgent->new;
my $response = $ua->request( HTTP::Request->new( "GET", "http://https://api.twitter.com/1/users/show.json?screen_name=aplusk" ) );
my $data = $response->content();

Затем сделайте так, чтобы HTML::Mason делал то, что вы хотите от json $data