A nice GNU/non-Perlish way ...

Not a Perl way ...

On the contrary, that's exactly a perlish way. Remember, TMTOWTDI includes not using perl (right tool for the job and all that).