in reply to Get Vowels from sentence

echo "There once was a doggy in the window. I went into the store and inquired about the price, the doggy was too nice to ever think twice, so now I have a doggy to care for." | perl -pe 's/[aeiou]//gi; s/y//gi if rand() > .5'

:)

In Section Seekers of Perl Wisdom