diff options
Diffstat (limited to 'use.buetow.org/content')
29 files changed, 271 insertions, 0 deletions
diff --git a/use.buetow.org/content/Bench.sub/IntVSCon.xml b/use.buetow.org/content/Bench.sub/IntVSCon.xml new file mode 100644 index 0000000..d6ba4ef --- /dev/null +++ b/use.buetow.org/content/Bench.sub/IntVSCon.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Interpolated vs. constant!</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/bench/intvscon.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Bench.sub/Loop.xml b/use.buetow.org/content/Bench.sub/Loop.xml new file mode 100644 index 0000000..15a35ad --- /dev/null +++ b/use.buetow.org/content/Bench.sub/Loop.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Loop benchmarking!</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/bench/foreach.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Bench.sub/Shift.xml b/use.buetow.org/content/Bench.sub/Shift.xml new file mode 100644 index 0000000..a99dcc4 --- /dev/null +++ b/use.buetow.org/content/Bench.sub/Shift.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Shift benchmarking!</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/bench/shift.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Bench.sub/home.xml b/use.buetow.org/content/Bench.sub/home.xml new file mode 100644 index 0000000..cb924bc --- /dev/null +++ b/use.buetow.org/content/Bench.sub/home.xml @@ -0,0 +1,7 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Benchmarking</pagetitle> + <text> + This section contains perl benchmarking stuff :) + </text> +</content> diff --git a/use.buetow.org/content/Diverse.sub/Fibonacci.xml b/use.buetow.org/content/Diverse.sub/Fibonacci.xml new file mode 100644 index 0000000..c85b036 --- /dev/null +++ b/use.buetow.org/content/Diverse.sub/Fibonacci.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Fast Fibonacci calculating!</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/diverse/fibonacci.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Diverse.sub/foo.xml b/use.buetow.org/content/Diverse.sub/foo.xml new file mode 100644 index 0000000..0b6ac7e --- /dev/null +++ b/use.buetow.org/content/Diverse.sub/foo.xml @@ -0,0 +1,6 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Foo!</pagetitle> + <text>Nothing here!</text> + </code> +</content> diff --git a/use.buetow.org/content/Diverse.sub/home.xml b/use.buetow.org/content/Diverse.sub/home.xml new file mode 100644 index 0000000..8c28dcc --- /dev/null +++ b/use.buetow.org/content/Diverse.sub/home.xml @@ -0,0 +1,7 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Diverse stuff</pagetitle> + <text> + This section contains some diverse perl stuff + </text> +</content> diff --git a/use.buetow.org/content/Examples.sub/Autoload.xml b/use.buetow.org/content/Examples.sub/Autoload.xml new file mode 100644 index 0000000..ba04d0d --- /dev/null +++ b/use.buetow.org/content/Examples.sub/Autoload.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Autoload</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/examples/autoload.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Examples.sub/Dualvar.xml b/use.buetow.org/content/Examples.sub/Dualvar.xml new file mode 100644 index 0000000..1a4b1d8 --- /dev/null +++ b/use.buetow.org/content/Examples.sub/Dualvar.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Dual variable</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/examples/dualvar.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Examples.sub/HashTie.xml b/use.buetow.org/content/Examples.sub/HashTie.xml new file mode 100644 index 0000000..76b4348 --- /dev/null +++ b/use.buetow.org/content/Examples.sub/HashTie.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>HashTie</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/examples/hashtie.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Examples.sub/Iterator.xml b/use.buetow.org/content/Examples.sub/Iterator.xml new file mode 100644 index 0000000..7e5b367 --- /dev/null +++ b/use.buetow.org/content/Examples.sub/Iterator.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Iterator</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/examples/iterator.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Examples.sub/MyGrep.xml b/use.buetow.org/content/Examples.sub/MyGrep.xml new file mode 100644 index 0000000..b0c18ea --- /dev/null +++ b/use.buetow.org/content/Examples.sub/MyGrep.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>MyGrep</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/examples/mygrep.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Examples.sub/ReadOnly.xml b/use.buetow.org/content/Examples.sub/ReadOnly.xml new file mode 100644 index 0000000..9b0b994 --- /dev/null +++ b/use.buetow.org/content/Examples.sub/ReadOnly.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>ReadOnly</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/examples/readonly.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Examples.sub/Scopeing.xml b/use.buetow.org/content/Examples.sub/Scopeing.xml new file mode 100644 index 0000000..5656a54 --- /dev/null +++ b/use.buetow.org/content/Examples.sub/Scopeing.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Scopeing</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/examples/scopeing.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Examples.sub/StaticVar.xml b/use.buetow.org/content/Examples.sub/StaticVar.xml new file mode 100644 index 0000000..d6afd53 --- /dev/null +++ b/use.buetow.org/content/Examples.sub/StaticVar.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>StaticVar</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/examples/staticvar.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Examples.sub/Structs.xml b/use.buetow.org/content/Examples.sub/Structs.xml new file mode 100644 index 0000000..c4093ea --- /dev/null +++ b/use.buetow.org/content/Examples.sub/Structs.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Scructs</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/examples/structs.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Examples.sub/home.xml b/use.buetow.org/content/Examples.sub/home.xml new file mode 100644 index 0000000..0b53a1b --- /dev/null +++ b/use.buetow.org/content/Examples.sub/home.xml @@ -0,0 +1,5 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Examples</pagetitle> + <text>This section contains some perl examples of cool perl features :)</text> +</content> diff --git a/use.buetow.org/content/Examples.sub/overload.xml b/use.buetow.org/content/Examples.sub/overload.xml new file mode 100644 index 0000000..c34a79a --- /dev/null +++ b/use.buetow.org/content/Examples.sub/overload.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Overload</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/examples/overload.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Fun.sub/Fibonacci.pl.c.xml b/use.buetow.org/content/Fun.sub/Fibonacci.pl.c.xml new file mode 100644 index 0000000..6f17e40 --- /dev/null +++ b/use.buetow.org/content/Fun.sub/Fibonacci.pl.c.xml @@ -0,0 +1,15 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Fibonacci.pl.c!</pagetitle> + <text> + <noop>The following code is both, valid C and Perl code :)</noop> + </text> + <code> + <perl> + use LWP::Simple; + my $ret = get("https://ssl.buetow.org/repos/playground/trunk/Perl/perl-c/fibonacci.pl.c"); + $ret =~ s/</</; + $ret; + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Fun.sub/Nosemicolon.xml b/use.buetow.org/content/Fun.sub/Nosemicolon.xml new file mode 100644 index 0000000..467feb4 --- /dev/null +++ b/use.buetow.org/content/Fun.sub/Nosemicolon.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Fibonacci Numbers w/o ;</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/fun/nosemicolon.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Fun.sub/Rev.xml b/use.buetow.org/content/Fun.sub/Rev.xml new file mode 100644 index 0000000..a7f2738 --- /dev/null +++ b/use.buetow.org/content/Fun.sub/Rev.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Random letters!</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/fun/rev.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Fun.sub/home.xml b/use.buetow.org/content/Fun.sub/home.xml new file mode 100644 index 0000000..9bdbed1 --- /dev/null +++ b/use.buetow.org/content/Fun.sub/home.xml @@ -0,0 +1,7 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Fun stuff</pagetitle> + <text> + This section contains some perl fun stuff + </text> +</content> diff --git a/use.buetow.org/content/Poetry.sub/Christmas.xml b/use.buetow.org/content/Poetry.sub/Christmas.xml new file mode 100644 index 0000000..783a6d0 --- /dev/null +++ b/use.buetow.org/content/Poetry.sub/Christmas.xml @@ -0,0 +1,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/</</g; + $ret; + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Poetry.sub/Math.xml b/use.buetow.org/content/Poetry.sub/Math.xml new file mode 100644 index 0000000..b9bc42b --- /dev/null +++ b/use.buetow.org/content/Poetry.sub/Math.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Learning math!</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/poetry/math.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Poetry.sub/PHP.xml b/use.buetow.org/content/Poetry.sub/PHP.xml new file mode 100644 index 0000000..2610188 --- /dev/null +++ b/use.buetow.org/content/Poetry.sub/PHP.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>PHP!</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/poetry/php.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Poetry.sub/Shopping.xml b/use.buetow.org/content/Poetry.sub/Shopping.xml new file mode 100644 index 0000000..8d98961 --- /dev/null +++ b/use.buetow.org/content/Poetry.sub/Shopping.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Going shopping!</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/poetry/shopping.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Poetry.sub/Travel.xml b/use.buetow.org/content/Poetry.sub/Travel.xml new file mode 100644 index 0000000..12b1ea5 --- /dev/null +++ b/use.buetow.org/content/Poetry.sub/Travel.xml @@ -0,0 +1,10 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Travel!</pagetitle> + <code> + <perl> + use LWP::Simple; + get("https://ssl.buetow.org/repos/playground/trunk/Perl/poetry/travel.pl"); + </perl> + </code> +</content> diff --git a/use.buetow.org/content/Poetry.sub/home.xml b/use.buetow.org/content/Poetry.sub/home.xml new file mode 100644 index 0000000..46c2de7 --- /dev/null +++ b/use.buetow.org/content/Poetry.sub/home.xml @@ -0,0 +1,5 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Poetry</pagetitle> + <text>This section contains perl poetry :)</text> +</content> diff --git a/use.buetow.org/content/home.xml b/use.buetow.org/content/home.xml new file mode 100644 index 0000000..10ec350 --- /dev/null +++ b/use.buetow.org/content/home.xml @@ -0,0 +1,7 @@ +<?xml version="1.0" encoding="ISO-8859-1" standalone="yes" ?> +<content> + <pagetitle>Welcome to use.buetow.org!</pagetitle> + <text> + This site contains some nice Perl stuff! + </text> +</content> |