Perl tr command problem

Shell Programming and Scripting
1

#!/usr/bin/perl

#use strict;
#use warnings;

my $data = 'node: id=c1, class=nb, cx=100, cy=100, r=10';

#in the above string stored in $data i want to replace = with =" and ',' with "\t

so i used the tr operator as follows

$data =~tr/=/="/s;
print "$data";

But this is not giving me the desired result . what am i doing wrong?

2

tr is to replace one char by another char. If you want to replace by multiple characters then use this

$data=~ s/=/="/g
3

your right...This works like a charm . Thank you .