$ perl -le '
> $str = q{abcde};
> print $str;
> $str .= q{fgh};
> print $str;'
abcde
abcdefgh
$