cgi-bin/bare_mason.pl

   1 # this script is called like /bare_mason.pl/path/to/mason.mas, and
   2 # simply executes the mason component with no parameters and returns
   3 # the bare text.
   4
   5 # example usage: provide the site header and footer html as a web service
   6
   7 use strict;
   8 use warnings;
   9 use CGI ();
  10
  11 my $cgi = CGI->new;
  12 if( my $component_name = $cgi->path_info ) {
  13     print "\n\n";
  14     print $c->render_mason( $component_name, bare_render => 1 );
  15 }