Select Code to Download

  map {/dothis/} @variable;
  grep {/more stuff/} @more;

  map(sub {/dothis/}, @variable);
  grep(sub {/more stuff/}, @more);

  print A "hello";
  print $somevar, "can be seperated like this";

  print STDOUT $somevar, "can be seperated like this";