Drogo.

Leichter Webrahmen
Jetzt downloaden

Drogo. Ranking & Zusammenfassung

Anzeige

  • Rating:
  • Lizenz:
  • Perl Artistic License
  • Preis:
  • FREE
  • Name des Herausgebers:
  • Ohio-Pennsylvania Software, LLC
  • Website des Verlags:
  • http://search.cpan.org/~mjflick/

Drogo. Stichworte


Drogo. Beschreibung

Drogo ist ein leichtes Perl Web ein Projekt framework.SYNOPSISKick-Start: drogo --create = orapp.psgi: Verwendung Drogo :: Server :: PSGI; verwenden Beispiel :: App; my $ app = sub {my $ env = shift; Rückkehr sub {my $ respond = shift; # Erstellen neues Serverobjekt my $ server = Drogo :: Server :: PSGI-> new (env => $ env, respond => $ respond); Beispiel :: App-> Handler (Server => $ Server); }}; Beispiel / App.pm: Paket Beispiel :: App; Verwenden Sie streng; Verwendung Drogo :: Dispatch (auto_import => 1); Unter init {my $ self = shift; $ Self -> {foo} = 'bar'; } Untergrund: Index {my $ self = shift; # $ Self-> r eine gemeinsame Antwort / requet Objekt # $ self-> Anfrage / req ein Request-Objekt gibt # $ self-> Antwort / res gibt eine Antwort Objekt # $ self-> Dispatcher kehrt Drogo Objekt # $ self- > Server ist ein Server-Objekt $ self-> r-> header ( 'text / html'); # Default $ self-> r-> Status (200); # Standardmäßig auf 200 sowieso $ self-> r-> print ( 'Willkommen!'); $ Self-> r-> print (q ); $ Self-> r-> detach; Stop # jede Dispatching jetzt und Ausfahrt} # durch / foo sub foo verwiesen: Aktion {my $ self = shift; my $ Zeug = $ self-> r-> param ( 'Material'); $ Self-> r-> print ( 'Hallo!'); } Unter stream_this: Aktion {my $ self = shift; # Stop-Dispatcher $ self-> dispatcher-> Dispatching (0); $ Self-> server-> header_out ( 'ETag' => 'fakeetag'); $ Self-> server-> header_out ( 'Cache-Control' => 'public, max-age = 31536000'); $ Self-> server-> send_http_header ( 'text / html'); $ Self-> server-> print ( 'Das war direkt gestreamt'); } # Referenziert von / moo / was auch immer Unter moo: ActionMatch {my $ self = shift; mein @args = $ self-> r-> übereinstimmt; $ Self-> r-> print ( 'Howdy:'. $ Args ); } # Referenzierten / König / was / Schlange / was auch immer Unter Biber: ActionRegex ( 'König /(.*)/ Schlange /(.*)') {my $ self = shift; mein @args = $ self-> übereinstimmt; $ Self-> r-> print ( "brüllen: $ args , $ args "); }} Produkt-Homepage


Drogo. Zugehörige Software