[Moscow.pm] определить blessed объект

[Ivan Petrov]

а как определить на перле что вот эта данная ссылка есть bless'еd объект?

пока определяю так:

if ("$obj" =~ /=/)

то есть приводим к строке, дальше ее по сути парсим.

на XS это делается легко, но XS использовать не хочется, от регулярных
выражений так же хочется отказаться, а так же надо бы и тот случай в котором
привод к строке (overload) прописан тоже распознавать как-то.

как сделать сабж? брать ref и сравнивать его со всеми допустимыми вариантами
не blessed ссылок?
то есть если ref !~ /^(SCALAR|ARRAY|HASH|CODE|REF|GLOB|Regexp|VSTRING|IO)$/

изящнее вариант есть?
----------- следущая часть -----------
Вложение в формате HTML было извлечено…
URL: <http://mail.pm.org/pipermail/moscow-pm/attachments/20110226/340cd697/attachment.html>