path: root/PerlQt/t/My/Codec.pm

package My::Codec;
use Qt;
use Qt::isa qw( Qt::TextCodec );

sub NEW
{
    shift->SUPER::NEW(@_);
}

1;