Thank you all for your comments.

Why did I want to do it in one statement? I didn't, but I just wanted to know what was wrong with my Perl knowledge that I couldn't figure out how to do it, that's all.

I've learnt something useful and portable about executing a block inside a statement, so that's cool.

And, nothing wrong with the map version of it, but just note that it doesn't do what mine does, because my first par is marked as such, (the later pars have a different class). This is a standard in applications which share news stories via XML, or so my friends in online news tell me.
--

($_='jjjuuusssttt annootthhrer
     pppeeerrrlll haaaccckkeer')=~y/a-z//s;print;
[download]