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

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".

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

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