my $str = "hello";
print ref \substr( $str, 0, 2 );

##</code><code>##

print ref {};
print ref bless {}, "MyObject";