Имена преременных

[Error202]

Есть скрипт 1754 строки...
Мне нужно, чтобы заканчивал работу скрипт тем, что выводил имена всех используемых переменных... т.е.
...
...
...
В скрипте использовались: $name, $name145 и т.д.

Возможно ли такое?

[arto]

perldoc B::Xref
perldoc B::Sholex