Hi, all.

use strict;
my $str = 'lazha';
my $pattern = 'la(zh)(a)';
my $replacement = '$1o"p$2';

$str =~ s/$pattern/$replacement/;
print $str;
__END__

I want

zho"pa

to be printed. So far it is obviously '$1o"p$2'. eval (as well as s///ee) 
doesn't seem to be helpful.
More generally, I want to know if there is a way to interpolate variables in a 
single quoted string (or possibly change the quotation before?) at any moment.

Thanks,
Artem A. Avetisyan.

_______________________________________________
Perl-Win32-Users mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to