Perlを触り始めたばかりなので、何がなんだかわかっていません。
DIBを使用したいのですが、以下のエラーが出てしまいます。

【ソース】
1 #!/usr/perl5/bin/perl
2 ##
3 ##
4 require "/u01/app/oracle/OraHome_1/perl/lib/site_perl/5.6.1/i86pc-solaris/Bundle/DBI.pm";
5
6 @ary = DBI->available_drivers;
7 foreach (@ary){
8 print $_,"\n";
9 }

【エラー】
$ /usr/bin/perl test01.cgi
Can't locate object method "available_drivers" via package "DBI"
(perhaps you forgot to load "DBI"?) at test01.cgi line 6.

【環境】
Solaris9 + Oracle10g(10.1.0.3.0)

ご存知の方、ご指導よろしくお願いします。