App-Mowyw

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

example/includes/header
example/includes/menu-nav
example/includes/news.xml
example/mowyw.conf
example/source/.htaccess
example/source/bar.shtml
example/source/foo.shtml
example/source/foo1.shtml
example/source/foo2.shtml
example/source/images/arrow.gif
example/source/images/bg.png
example/source/images/document.gif
example/source/index.shtml
example/source/no-header-footer.shtml
example/source/print.css
example/source/style.css
INSTALL
lib/App/Mowyw.pm
lib/App/Mowyw/Datasource.pm
lib/App/Mowyw/Datasource/Array.pm
lib/App/Mowyw/Datasource/DBI.pm

example/source/bar.shtml  view on Meta::CPAN

	my $x = $width * rand();
	my $y = $height * rand();

	for (0 .. 5000 * $edges * $edges * $edges){
		my $i = int ($edges*rand());
		$x = .5*($x + $x[$i]);
		$y = .5*($y + $y[$i]);
		$im->setPixel(int $x, int $y, $black);
	}

	my $fn = sprintf("sierpinski-%02d.png", $edges);

	open(OUT, ">", $fn) or die "$0: can't write to file '$fn': $!";
	print "Writing file $fn\n";

	binmode OUT;
	print OUT $im->png;
	close OUT;
}
[%endsyntax%]</pre>

<p>Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Sed ut dui ac lacus egestas vehicula. Quisque faucibus, risus id consequat porta, orci ligula condimentum mi, ac commodo leo libero eget tortor. Maecenas a ligula in nibh luctus gravida. Pr...

</div>

[%menu nav bar%]

example/source/style.css  view on Meta::CPAN

body {
	font: small/1.8em "Trebuchet MS", Verdana, Helvetica, sans-serif;
	color: #222;
	margin: 0;
	padding: 0 1em;
	background: #5B99D7 url(images/bg.png);
}

h1 {
	font-size: 3em;
	font-weight: normal;
	line-height: 1.3em;
}

h2 {
	font-size: large;



( run in 1.458 second using v1.01-cache-2.11-cpan-df04353d9ac )