substr $string, 0, 0, 'a';

##</code><code>##

substr ($string, 0, 0) = 'a';

##</code><code>##

my $string = 'a';
$string .= 'bcde';