my $q = CGI->new( sub { $self->_ul_hook( @_ ) }, undef, 0 );