Seem to me it's simpler if you avoid the recursion altogether.

script:

#!/bin/sh
wrapper real_script "$@"
[download]

wrapper:

#!/bin/sh
perl "$@"
[download]

real_script:

#!perl -w
4;
print("Hello, World\n");
[download]

$ script
Useless use of a constant (4) in void context at real_script line 2.
Hello, World
[download]