How about an easy way to get the ORACLE_HOME set using perl?

now when i use shell scripts i set the ORACLE_SID only and use oraenv to get the ORACLE_HOME? I don't want to updates scripts everytime i upgrade the database.

what would be comparable to using oraenv in perl (or how do you use oraenv to run in the same shell as the perl script)?

thx, d.