I think BEGIN::Lift claims to do that, but it only extends to lifting subroutine calls. Depending on your actual use case, this might be enough already.

Update: Also, Devel::BeginLift, which does the same according to BEGIN::Lift.