my $str = 'ab';
$str x= 2;
print $str;
# 'abab'