print $obj->special, "\n";

##</code><code>##

use overload (
    '""' => 'stringify', # or whatever
    bool => sub { 1 },
    # ...
);