[urisagit/CMS-Simple.git] / make_slides / bug.pl

#!/usr/local/bin/perl

use strict ;
use warnings ;

use CMS::Simple ;
use Data::Dumper ;

my $content = CMS::Simple::Parse::parse_content( <<CONT ) ;
foo: bar
foo::
	baz: jfdjdfj
END:
foo: more
foo:: more2
	aaa: 4
END:
CONT

print Dumper $content ;
Commit	Line	Data
9e609156	1	#!/usr/local/bin/perl
	2
	3	use strict ;
	4	use warnings ;
	5
	6	use CMS::Simple ;
	7	use Data::Dumper ;
	8
	9	my $content = CMS::Simple::Parse::parse_content( <<CONT ) ;
	10	foo: bar
	11	foo::
	12	baz: jfdjdfj
	13	END:
	14	foo: more
	15	foo:: more2
	16	aaa: 4
	17	END:
	18	CONT
	19
	20	print Dumper $content ;