I tried
use constant CAPPED_TRIPS => (' code'=>' !!<em>ADMIN ##</em>');
and entering Admin##code or Admin#code returns Admin!!MIVjB2tk and Admin!FKk4keqK9w respectively, when I expect Admin##ADMIN. Sorry if this is obvious, I just started learning perl.