in reply to Reaped: this should be a sopw

It appears so yes

In Section Seekers of Perl Wisdom