Teil 3: CMS-Serie: Mason
- CMS-Serie: Mason
- Teil 2: CMS-Serie: Mason
- Teil 3: CMS-Serie: Mason
- Teil 4: CMS-Serie: Mason
Da in diesem Beispiel kein Root-Verzeichnis festgelegt worden ist, geht Mason 1.4 in diesem Beispiel einfach davon aus, dass das aktuell genutzte Verzeichnis genutzt werden soll. Außerdem empfiehlt es sich, ein Arbeitsverzeichnis festzulegen, denn standardmäßig werden keine Objektdateien angelegt...
Da in diesem Beispiel kein Root-Verzeichnis festgelegt worden ist, geht Mason 1.4 in diesem Beispiel einfach davon aus, dass das aktuell genutzte Verzeichnis genutzt werden soll. Außerdem empfiehlt es sich, ein Arbeitsverzeichnis festzulegen, denn standardmäßig werden keine Objektdateien angelegt und auch das aus Performancegründen sinnvolle Caching findet nur dann statt, wenn ein Arbeitsverzeichnis definiert wurde.

In dem leicht erweiterten Beispiel mit einem Root- und Datenverzeichnis wird das Resultat in einer Variablen festgehalten und kann dann ausgegeben werden:
#!/usr/bin/perl
use HTML::Mason;
use strict;
my $ausgabestring;
my $inhalt = HTML::Mason::Interp->new
(comp_root => '/www.magnus.de/
mason/mason_root',
data_dir => '/www.magnus.de/mason/
daten_verzeichnis',
out_method => \$aus
gabestrng);
$inhalt->
exec(<component-path>, <args>...);
Möchte man das Perl-Modul HTML:: Mason::CGIHandler in Mason in einer CGI-Umgebung nutzen, muss man entweder httpd.conf oder .htaccess anpassen:
<LocationMatch
"\.html$">
Action html-mason
/cgi-bin/mason_handler.cgi
AddHandler html-mason .html</LocationMatch><LocationMatch "^/cgi-bin/">
RemoveHandler .html</LocationMatch><FilesMatch "(autohandler|dhandler)
$">
Order allow,deny
Deny from all</FilesMatch>
Das Skript mason_handler.cgi kann sich im Verzeichnis /cgi-bin/ befinden:
#!/usr/bin/perl
use HTML::Mason::CGIHandler;
my $workshopbeispiel = HTML::Mason::
CGIHandler->new
(
data_dir => '/home/
workshop/quelltext/mason_daten',
allow_globals =>
[qw(%session $u)],
);
$workshopbeispiel->
handle_request;
Die passsende Mason-Komponente dazu sieht so aus:
<%args>
$beispiel => 'erfolgreich'</%args>
% $r->err_header_out(Location =>
"https://www.magnus.de/beispiel/$beispiel.html");
Diese Komponente gehört in das Root-Verzeichnis des Apache-Webservers.
Anfragen auf Verzeichnisebene
Standardmäßig lehnt Mason Anfragen an eine Verzeichnisebene ab und überlässt es Apache, die Übersicht der Inhalte in dem betreffenden Verzeichnis oder eine Zugriff-verweigert-Fehlermeldung anzuzeigen. Damit Mason auch solche Anfragen verarbeitet, die sich an eine Verzeichnisebene richten, muss man die Variable decline_dirs auf 0 setzen. Den Inhaltstyp bestimmt die Konfigurationsdatei dhandler mittels $r->content_type().