Re^2: How to tell if a variable is blessed ?

I tried to do it with ref, but than the only solution I can think of is:

if ( ref($a) && ref($a) !~ /HASH|ARRAY/ ) {
    $a->blabla(...) ;
}
[download]

According to the answers to this post I assume this is the answer ?!

Thanks
Luca

Comment on Re^2: How to tell if a variable is blessed ? Download Code