/[MITgcm]/mitgcm.org/devel/buildweb/pkg/swish-e/example/modules/TemplateDumper.pm
ViewVC logotype

Annotation of /mitgcm.org/devel/buildweb/pkg/swish-e/example/modules/TemplateDumper.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.1.1.1 - (hide annotations) (download) (vendor branch)
Fri Sep 20 19:47:30 2002 UTC (22 years, 10 months ago) by adcroft
Branch: Import, MAIN
CVS Tags: baseline, HEAD
Changes since 1.1: +0 -0 lines
Importing web-site building process.

1 adcroft 1.1 #===============================================================================
2     # This just dumps out the results object.
3     # Need to use a query string to do anything interesting
4     #
5     # $Id: TemplateDumper.pm,v 1.1 2001/12/06 07:32:11 whmoseley Exp $
6     #
7     #===============================================================================
8     package TemplateDumper;
9     use strict;
10    
11     use Data::Dumper;
12    
13     sub show_template {
14     my ( $class, $template_params, $results ) = @_;
15    
16     $Data::Dumper::Quotekeys = 0;
17     print "Content-Type: text/plain\n\n",
18     Dumper $template_params,
19     Dumper $results;
20     }
21    
22     1;
23    
24    

  ViewVC Help
Powered by ViewVC 1.1.22