Perl Framework Next Generation und AJAX

Die Integration von AJAX in das Perl-Framework

Automatisch auf JS/AJAX umschalten wenn JS verfügbar ist

Mit meinem Perl-Framework gestaltet sich die Erweiterung auf AJAX recht einfach. Praktisch schaltet der Browser selbstständig um, wenn JavaScript verfügbar ist, erfolgt kein Submit sondern ein AJAX-Request. Serverseitig wird das unterschieden und dann wird entweder eine neue Seite mit veränderten Platzhaltern ausgeliefert oder es werden nur die Platzhalter ausgeliefert:

    if( $ENV{HTTP_ACCEPT} && $ENV{HTTP_ACCEPT} eq 'application/x-serialized' ){
        $self->{CONTENT} = XR::xr($out, $res);
    }
    else{
        $self->{STASH}{out} = XR::xr($out, $res);
    }

Der übrige CODE bleibt für die Anwendung dieses Konstrukts unverändert.


Datenschutzerklärung: Diese Seite dient rein privaten Zwecken. Auf den für diese Domäne installierten Seiten werden grundsätzlich keine personenbezogenen Daten erhoben. Das Loggen der Zugriffe mit Ihrer Remote Adresse erfolgt beim Provider soweit das technisch erforderlich ist. nmq​rstx-18­@yahoo.de