Help for this page
use Modern::Perl; my $dollars= 'I have $10.'; ... $dollars =~ s/\$/€/; say "Now $dollars";
I have $10. Now I have €10.