Help for this page

Select Code to Download


  1. or download this
    When I was walking down the [street|boulevard|avenue] a large
    [squirrel|frog|lemur|llama] [leaped|jumped|ran|crawled] out and
    [bit|mauled|chewed|spit at] me!
    You'd never believe what [Name?] said!
    
  2. or download this
    % perl madlib sample.madlib
    Name? George Jetson
    When I was walking down the avenue a large llama jumped out
    and bit me!
    You'd never believe what George Jetson said!
    
  3. or download this
    select STDERR;$|++;select STDOUT;$_=join('',<>);
    s#\[([^\]]*\?)\]#print STDERR"$1 ";chomp($i=<STDIN>);$i#ge;
    s#\[([^\]]*)\]#@f=split(/\|/,$1);$f[rand@f]#ge;print