http://www.perlmonks.org?node_id=29244


in reply to How do I insert (not overwrite) into a string?

my $str = 'ello';
my $char = 'H';

print $str, "\n";

substr($str, 0, 0, $char);

print $str, "\n";

[download]

In Section Seekers of Perl Wisdom