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

##</code><code>##

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

##</code><code>##

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

##</code><code>##

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