if ($signature)
{
    if (blessed $x)
    {
        return TRUE if $x->isa( $signature );
    }
    elsif (ref $x)
    {
        return TRUE if ref $x eq $signature;
    }
    else
    {
        die "$x doesn't match $signature\n";
    }
}