>perl -wMstrict -le
"my $test = 'abc1 abc1 abc1 abc1 abc1';
 $test =~ s/1/++$1/eg;
 print $test;
"
Modification of a read-only value attempted at -e line 1.