my $string = get_string();
  put_string_ref(\$string);

##</code><code>##

  put_string_ref(\get_string())