in reply to Subroutines loaded in from other files

I don't have an answer, but I do have a question -- is this regarded as a sensible way to code Perl? (or even PERL?). Is it the fashionable way?

I've seen this approach a few times, and it makes for increased modularity I guess, but I don't love it.

What are the monks thoughts on this approach.
--

($_='jjjuuusssttt annootthheer pppeeerrrlll haaaccckkeer')=~y/a-z//s;print;