Thanks for the suggestion, zengargoyle, and also to TVSET (replies that follow). I wanted to avoid giving the impression that I had appropriated your idea w/o so much as a nod in your direction (in Updates above, in root node) -- in fact I came up with and reposted much the same workflow plan independently before revisiting the node and seeing your reply. Nonetheless thanks very much; obviously great minds ... or some kind of minds ... think alike. ;-)

-- 
use PerlMonk::Tye qw(:wisely);