use.buetow.org/content/Poetry.sub/Christmas.xml


1
2
3
4
5
6
7
8
9
10
11
12

<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?>
<content>
  <pagetitle>Merry Christmas!</pagetitle>
  <code>
  <perl>
 	use LWP::Simple;
	my $ret = get("https://ssl.buetow.org/repos/playground/trunk/Perl/poetry/christmas.pl");
	$ret =~ s/</&lt/g;
	$ret;
  </perl>
  </code>
</content>