Select Code to Download

use warnings;
use strict;
...
print $i++ . ". $_\n"
  for glob
"{'I','You','We'}{' play',' do not play'}{' soccer'}{' at home.',' at 
+school.'}";

1. I play soccer at home.
2. I play soccer at school.
...
10. We play soccer at school.
11. We do not play soccer at home.
12. We do not play soccer at school.