package DBD::Oracle; # test use strict; use warnings; sub ORA_DATE () { 2 }; sub ORA_NUMBER () { 3 } ; sub ORA_VARCHAR2 () { 5 }; 1;