My search-fu was apparently pretty weak as I ended up finding my answer on here after all http://www.perlmonks.org/?node_id=164082 The last reply gives exactly what I was looking for