I think

    elsif ($given =~ /An Ear/i){
        return (q~I sing~);
[download]

would only work if the main program had

use festival;
[download]

and a set of speakers. But I could be wrong...

- Ozymandias