I figured that I would update this for the benefit of anyone who comes along and decides to try it. I went with Mr. Muskrat's idea and it has worked great. Recently I had a problem handling a first arg that is an undefined scalar, for example:
open(my $file, "<", $file);
Again tilly came to the rescue: see
anonymous filehandle for overridden open sub.
-Joe