Converting "sqlplus / as sysdba" to DBI->connect command in Perl

[tpawona]

I'm writing a script that would be run by user oracle, that would logon to all the databases on the server. Thus I'll need to logon as sysdba.
In Sqlplus, this would be sqlplus / as sysdba.
How do I do this in Perl.
I've tried
$dbh = DBI->connect("dbi:Oracle:host=$host;sid=$sid","/","",{ ora_session_mode => SYSDBA });

I keep getting invalid username/password.I'm logged on at the unix level as user "oracle".

[GunnarH]

Maybe you need to make the Perl script setuid or setgid. See perlsec for some guidance.