while(my $row = $sth->fetchrow_hashref()) { print $row->{'TABLE_NUMBER'}, " ", $row->{'LOV_INTEGER_KEY'}, " ", $row->{'LOV_DISPLAY_KEY'}, " ", $row->{'NOTE'}, "\n"; } #### Configuring M/MJ/MJEVANS/DBD-Oracle-1.80.tar.gz with Makefile.PL Using DBI 1.642 (for perl 5.028001 on MSWin32-x64-multi-thread) installed in C:/Strawberry/perl/vendor/lib/auto/DBI/ Configuring DBD::Oracle for perl 5.028001 on MSWin32 (MSWin32-x64-multi-thread) If you encounter any problem, a collection of troubleshooting guides are available under lib/DBD/Oracle/Troubleshooting. 'DBD::Oracle::Troubleshooting' is the general troubleshooting guide, while platform-specific troubleshooting hints live in their labelled sub-document (e.g., Win32 hints are gathered in 'lib/DBD/Oracle/Troubleshooting/Win32.pod'). Installing on a MSWin32, Ver#10.0 Using Oracle in C:/Oracle/client/product/12.1.0/client_1 DEFINE _SQLPLUS_RELEASE = "1201000200" (CHAR) Oracle Version 12.1.0.2 (12.1) Found oci directory Using OCI directory 'oci' dlltool: unrecognized option `--input-def' Usage dlltool --machine --output-exp Generate export file. --output-lib Generate input library. --add-indirect Add dll indirects to export file. --dllname Name of input dll to put into output lib. --def Name input .def file --output-def Name output .def file --base-file Read linker generated base file --no-idata4 Don't generate idata$4 section --no-idata5 Don't generate idata$5 section -v Verbose -U Add underscores to .lib -k Kill @ from exported names --as Use for assembler --nodelete Keep temp files. Could not find or create liboci.a. Warning: No success on command[C:\Strawberry\perl\bin\perl.exe Makefile.PL] MJEVANS/DBD-Oracle-1.80.tar.gz C:\Strawberry\perl\bin\perl.exe Makefile.PL -- NOT OK #### SELECT table_number , TRIM(CAST(global_section_name as CHAR(32))) as global_section_name , TRIM(CAST(note as CHAR(80))) as note FROM rdb_main.dk_lov_header_rec WHERE note LIKE ? OR global_section_name LIKE ? ORDER BY global_section_name #### SELECT table_number , lov_integer_key , TRIM(CAST(lov_display_key as CHAR(2))) as lov_display_key , TRIM(CAST(note as CHAR(30))) as note FROM rdb_main.dk_lov_detail_rec WHERE table_number IN (LIST_OF_LOV_TABLE_NUMBERS:?) ORDER BY table_number, note