This is so obvious that I must have missed something. (caller 1)[3] has the caller's package and you could specify a protocol where the contract exists in __PACKAGE__ . "::Contract". So from your test code you'd say use Contract::File; and in Contract::File your import() would fetch the caller's package.

So now that I've publicly misunderstood your question, what did you mean again?