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