in reply to Parsing a string for sorting

Smells like homework to me!

--
$you = new YOU;
honk() if $you->love('perl');