>perl -wMstrict -le
"my $value = '!@#+&*';
 $value =~ tr/+/ /;
 print qq{'$value'};
"
'!@# &*'