Re: How to escape single quote(s) without the use of quotemeta (Data::Dumper)

[LanX]

quotemeta is meant for regex metas which form a super-set of "string metas".

But what about the stringyfications from Data::Dumper (single quote) or Data::Dump (double quote)?

  DB<62> use Data::Dumper qw/Dumper/

  DB<63> $Data::Dumper::Terse  = 1;

  DB<64> $x= Dumper q(It's\x\\)

  DB<65> print "<<<$x>>>"
<<<'It\'s\\x\\'
>>>
  DB<66> chomp $x

  DB<67> $x =~ s/^'(.*)'$/$1/

  DB<68> print "<<<$x>>>"
<<<It\'s\\x\\>>>
  DB<69>

edit

NB: If you wanna use $Data::Dumper::Terse think of localizing it or use the OO interface ...