my $var = 'world';
format STDOUT =
Hello @>>>>>>>>>>>>>>>
      $var
.
write;                                  # goes to STDOUT
# my $out = swrite;                     # I NEED HELP!