perlだと
$str = '1' x 8;

うう〜ん直感的にわかりやすい