Substitution loop at ./7.pl line 10.