How add \ in front of this $ in my string?

Question

my $cmd = 'this is a "testin$g" ok';
print Dumper($cmd);

$VAR1 = 'this is a "testin$g" ok';

my $cmd = 'this is a "testin$g" ok';
$cmd =~ s/\$/\\\$/;
print Dumper($cmd);

$VAR1 = 'this is a "testin\\$g" ok';

I am trying to end up with a string that looks like this: 'this is a "testin\$g" ok'. A single \ in front of the $. But even though I replace the $ with \$ it ends up with two instead.

foibs · Accepted Answer · 2013-10-30 15:17:57Z

6

Your regex and string are both correct. Data::Dumper escapes the characters itself.

For printing a simple string just use

print $cmd."\n";

And you'll see it's ok.

Also, try this to see how Dumper escapes the characters

print Dumper('this is a "testin\$g" ok');

answered Oct 30, 2013 at 15:17

foibs

3,4141 gold badge21 silver badges13 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

ikegami · Accepted Answer · 2013-10-30 15:51:40Z

1

Your substitution is correct. If you executed the following, you'd see that $cmd contains but a single backslash.

print("$cmd\n");    # this is a "testin\$g" ok

Data::Dumper prints a string literal that, when executed, would create the string in the structure.

$VAR1 = 'this is a "testin\\$g" ok';

indicates the variable dumped contains

this is a "testin\$g" ok

because

this is a "testin\$g" ok

gets assigned to $VAR1 when you execute

$VAR1 = 'this is a "testin\\$g" ok';

answered Oct 30, 2013 at 15:51

ikegami

391k17 gold badges291 silver badges555 bronze badges

Collectives™ on Stack Overflow

How add \ in front of this $ in my string?

2 Answers 2

Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related