Tatsumaki. Nicht blockierender Webrahmen auf Basis auf Pflack und AnyEvent
Jetzt downloaden

Tatsumaki. Ranking & Zusammenfassung

Tatsumaki. Stichworte

Perl-Modul Perl Hafen Tornado Tornado-Port.

Tatsumaki. Beschreibung

Nicht blockierender Webrahmen auf Basis auf Pflack und AnyEvent Das Tatsumaki Perl-Modul ist ein Spielzeughafen von Tornado für Perl Party-API- oder XML-Feeds), Server-Push Streaming und Long-Poll-Komet in einem sauberen Unified API.synopsis ### app.psgi Verwenden Sie Tatsumaki :: Fehler; Verwenden Sie Tatsumaki :: Application; Verwenden Sie Tatsumaki :: httpclient; Verwenden Sie Tatsumaki :: Server; Packung HauptHandler; Verwenden Sie Elternteil QW (Tatsumaki :: Handler); sub bekommen {mein $ self = wechseln; $ selbst-> Schreiben ("Hallo Welt"); } Packung FeedHandler; Verwenden Sie Elternteil QW (Tatsumaki :: Handler); __Packung __-> asynchron (1); Verwenden Sie JSON; sub {My ($ self, $ abfrage) = @_; Mein $ Client = Tatsumaki :: httpclient-> neu; $ Client-> GET ("http://friendfeed-api.com/v2/feed/$Query", $ self-> async_cb (sub {$ self-> ont_response (@_)}); } sub on_response {mein ($ self, $ res) = @_; if ($ res-> is_error) {tatumaki :: error :: http-> werfen (500); } My $ JSON = JSON :: decode_json ($ res-> content); $ self-> schreibe ("abgerufen". Skalar (@ {$ json -> {Einträge}}). "Einträge aus der API"); $ selbst-> Fertigstellung; } Paketstromwriter; Verwenden Sie Elternteil QW (Tatsumaki :: Handler); __Packung __-> asynchron (1); AnyEvent verwenden; sub bekommen {mein $ self = wechseln; $ self-> response-> content_type ('text / einfach'); meine $ probiere = 0; mein $ t; $ t = AE :: Timer 0, 0.1, Sub {$ self-> strom_write ("Aktuelle Unix-Zeit" ist ". Zeit. \ n"); if ($ try ++> = 10) {undef $ t; $ selbst-> Fertigstellung; }}; } Package Main; Meine $ app = tatumAki :: Application-> NEU (;); Senden Sie $ App; und nun ausführen Sie es mit: PLACKUP-SEITE ANDEREVENT -A APP.PSGI Anforderungen: · Perl.

Tatsumaki. Zugehörige Software