like('asdf$', quotemeta('asdf$'));

##</code><code>##

$re = quotemeta('asdf$'); like('asdf$', qr/$re/);

   -or-

like('asdf$', qr/@{[ quotemeta('asdf$') ]}/);

   -or-

like('asdf$', map { qr/$_/ } map quotemeta, 'asdf$');