perl oracle 权限

我 centos oracle用户安装oracle 10g
DBD::Oracle提示不成功
Trying to find an ORACLE_HOME
Your LD_LIBRARY_PATH env var is set to ''
找不到ORACLE_HOME
我安装oracle时环境变量在oracle用户下的.bash_profile里设置了，这里用的是root用户安装DBD::Oracle

我在root配置一下环境变量，root用户是不能登陆，这样安装DBD::Oracle还能正确吗?

用oracle登录后
用su命令切换为root安装
不要用su -

补充一下：我在root用户/etc/profile里配置的oracle下相同的环境变量，root用户是访问不了数据库的

必须su - oracle下才行
我在shell里这样执行的
su - oracle -c "sqlplus -S $DBUSER/$DBPASSWD<<EOF
                                        SQL语句"
但不知perl里如何做的呢?