...
$c='"a$1"';
...
$a =~ s/$b/$c/eeg ;
...