$ perl -E 'say q{abc} x 3;'
abcabcabc
$