From your my() declaration, I would say you're being tripped up by INTEGER being a constant that returns a value other than 'INTEGER'.

To use it properly, all you need do is omit your quotes...

my $type = INTEGER;

    --k.