token_re, include cleanup, git cleanup

[urisagit/Template-Simple.git] / comp.pl

diff --git a/comp.pl b/comp.pl
deleted file mode 100644 (file)
index c1281c0..0000000
--- a/comp.pl
+++ /dev/null
@@ -1,51 +0,0 @@
-#!/usr/local/bin/perl
-
-use strict ;
-use warnings ;
-
-use Template::Simple ;
-
-my $tmpl = Template::Simple->new() ;
-
-$tmpl->add_templates( { ddd => <<DDD } ) ;
-text1
-[%START nest%]
-       BAR is [%bar%]
-[%END nest%]
-DDD
-
-my %data = (
-       ddd     => [
-               {
-                       nest    => {
-                               bar => 'xxx',
-                       },
-               },
-               {
-                       nest    => {
-                               bar => 'yyy',
-                       },
-               },
-               {
-                       nest    => {
-                               bar => 'zzz',
-                       },
-               },
-       ],
-) ;
-
-$tmpl->compile('foo') ;
-#$tmpl->compile('fooz') ;
-
-#my $rendered = $tmpl->render('foo', { foo => 2, bar => 'xxx' } ) ;
-
-#print "REND [$$rendered]\n" ;
-
-$tmpl->compile('ddd') ;
-my $rendered = $tmpl->render( 'ddd', $data{ddd} ) ;
-
-print "REND [$$rendered]\n" ;
-
-print $tmpl->get_source( 'ddd' ) ;
-
-exit ;