#! perl

# delete $ENV{...} to clean up the environment if needed

exec {$0} "$0-wrapped", @ARGV;