http://www.perlmonks.org?node_id=11112152


in reply to Re: program cant find values that start with $
in thread program cant find values that start with $

Two different things!

Escaping the dollar means that variable interpolation won't happen and only literal '$zoek' can match.

quotemeta on the other hand escapes regex metas after inserting the content of $zoek

"zoek" is Dutch for "search" and is literal user input via Tk. But a $ in input is also a meta which needs to be quoted.

main::(-e:1): 0 DB<1> $x='.' DB<2> p 'a' =~ /$x/ 1 DB<3> p 'a' =~ /\Q$x/ DB<4> p '.' =~ /\Q$x/ 1 DB<5> p '.' =~ /$x/ 1 DB<6> p '.' =~ /\$x/ DB<7> p '$x' =~ /\$x/ 1 DB<8>

Cheers Rolf
(addicted to the Perl Programming Language :)
Wikisyntax for the Monastery FootballPerl is like chess, only without the dice