69 strokes - #!perl -n next if(($.%2)||(((length)-1)%2));!((tr/aeiouy//)%2) and print"$_";
> #!perl -n > next if(($.%2)||(((length)-1)%2));print"$_" unless((tr/aeiouy//)%2); But ... Still prints even sets of vowels :( -Sx-
69 strokes - #!perl -n next if(($.%2)||(((length)-1)%2));!((tr/aeiouy//)%2) and print"$_";
> #!perl -n > next if(($.%2)||(((length)-1)%2));print"$_" unless((tr/aeiouy//)%2); But ... Still prints even sets of vowels :( -Sx-