my $q = $1 ;
     $to =~ s/\$1/$q/g ;