my $tmpl_stash = Template::Stash->new( {
	'show_subcat' => \&show_subcat( $lpmkey ),
    } );

    my $tmpl_data = {
	"${lpmkey}select" => ' selected',
#	'show_subcat'     => show_subcat( $lpmkey ),
	'lpmcat'          => $lpmkey,
	'lpmcategory'     => { 'l' => 'Logos',
			       'p' => 'Photos',
			       'm' => 'More',
			   }->{ $lpmkey },
    };