Not much hope. $0 is a hint, not reliable, and @ARGV disappears as soon as someone messes with it. And the pipe-open is doing a fork, not a re-exec.

Better rethink your strategy.

-- Randal L. Schwartz, Perl hacker