gather {
my @a = (1..5).map({''});
until @a.join("") eq "ズンズンズンズンドコ" {
@a.shift;
@a.append: take ("ズン", "ドコ").pick;
}
take "キ・ヨ・シ！";
}.say
Perl6 便利
More than 5 years have passed since last update.
Register as a new user and use Qiita more conveniently
- You get articles that match your needs
- You can efficiently read back useful information
- You can use dark theme