[MacPerl-AnyPerl] Multiple Substitution

["Mark Yannuzzi" <myannuzzi@aya.yale.edu>]

I want to transform and print to a file the following form of text, which 
are stored in an array:

$label[$i] = 'VD(mA):'

I want to transform them to the following form:

$label[$i] = 'VD [mA]'

and find that the brute force approach, of course, works:

$label[$i] = s/\(/ [/;
$label[$i] = s/\):/]/;
print OUTFILE ($label[$i], "\t");
etc.

I tried, unsuccessfully, to combine the two substituitions into one
statement, and put it into the 'print' statement. Two questions:

1) Is there a way to combine the two substitution statements into one?
2) Why do substitution statements not work when placed in the 'print'
function?

Thanks.
----------------------
Mark J. Yannuzzi
myannuzzi@aya.yale.edu

==== Want to unsubscribe from this list?
==== Send mail with body "unsubscribe" to macperl-anyperl-request@macperl.org