Re^2: 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>
[download]

Cheers Rolf
_{(addicted to the Perl Programming Language :)

Wikisyntax for the Monastery
FootballPerl is like chess, only without the dice}

Comment on Re^2: program cant find values that start with $ Select or Download Code

Replies are listed 'Best First'.
Re^3: program cant find values that start with $ by AnomalousMonk (Archbishop) on Jan 31, 2020 at 08:32 UTC
Another way to look at this is via the stringization of `qr//`: `c:\@Work\Perl\monks>perl -wMstrict -le "my $x = '.'; print for qr{$x}, qr{\Q$x}, qr{\$x}, 'etc...'; " (?-xism:.) (?-xism:\.) (?-xism:\$x) etc...` [download] Give a man a fish: `<%-{-{-{-<`	[reply] [d/l] [select]
Re^4: program cant find values that start with $ by LanX (Saint) on Jan 31, 2020 at 09:02 UTC
Good point! ++ Cheers Rolf _{(addicted to the Perl Programming Language :) Wikisyntax for the Monastery FootballPerl is like chess, only without the dice}	[reply]