Select Code to Download

CODE : Set Oracle date format
...
print 'Got global_name: ' . ${&dbh}->selectrow_array('select * from gl
+obal_name') . "\n";

package main; 

...
------------------------------------