perlop .= (Additive Operators and Assignment Operators)

use warnings;
use strict;

my $var = 'abc';
$var .= 'lok';
print "$var\n";

__END__

abclok
[download]