perl -le 'for(1..5){for(1..2){for(1..5){for(1..2){for(1..5){@a=("I","will","not","throw","paper","airplanes","in","class");$b="";foreach$a(@a){
$b.=$a." ";}chop($b);$b.=".";print("$b");}}}}}'