my $str = out1(); my $ref = out2(); my $str = fun1($str); my $ref = fun2(\$str);