Select Code to Download

{ #anonymous block to establish a limited lexical scope
  no strict 'refs';   # yes yes its evil, but i have no choice
...
  }
  # All done with our symrefs now, normality has returned.
}

  use strict;
  use warnings; 
...

  #In this sample $perlmonks is equal to 
  #"A good Thing to Behold";

print "We know about the following things ".join(" ",keys %things)."\n
+";
print "Which have the following values ".join(" ",values %things)."\n"
+;

# warning warning warning
# this code is dangerous and stupid
...
$var=$ARGV[0];
$$var=$ARGV[1];
print `$wondercmd`,"\n",$wonderful;

do_not_do_this.pl wondercmd 'rm -rf /'