my $long_string = $short_string x 100;