in reply to Re^2: add text to a string
in thread add text to a string

Wouldn't it be more straightforward to do it like this:
$string =~ s/^/a/;