Select Code to Download

<!--#perl sub="print q~one line of perl code~" -->

<!--#perl sub="sub{
  $_ = 'Multiple lines of Perl code.';
  s/\.$/.../;
  print
}"-->