thanks! very useful script... however I have do predeclare $D outside of the subroutine, else I get the error message in $@: "Global Symbol $D requires explicit package name at (eval 2)" (perl 5.6.1 on solaris)