PERL - Oracle

Hi friends,
I am new to Perl programming. I have a requirement, using perl I need to connect to Oracle DB and get some records ( on unix environment). I googled and found that we need to use DBD (Database Drivers), DBI (DataBase Interface) to connect to oracle. I tried using " sqlplus username/password@dbname @test.sql" and it worked from perl script.
Once i get the records , i need to further process them and store in a seperate file.

My question is, what is the usual and best way of doing database programming in perl.

If you have some sample scripts please post them too...

Thanks in advance

Sample Perl script.

#!/usr/local/bin/perl5.8 -w

use strict;
use HTML;
use template;
use oracle;
use DBI;
use CGI;
use CgiLib;

my $dbh;

main:
{
my $pageName = "View Resource Details";
my $templateToUse = "$ENV{'APP_TOP'}/templates/view_details.html.tem";

my $loginUsername = "";
my $loginUserpass = "";
my $loginDB = "";
my %All_tags = ();
my @formData;

($loginUsername, $loginUserpass, $loginDB) = oracle::getOracleDatabaseLoginDetails();

CgiLib::ReadParse(\%All_tags);

$dbh = DBI->connect('dbi:Oracle:'.$loginDB, $loginUsername, $loginUserpass,
{ RaiseError => 0, AutoCommit => 0 } );

if(defined $All_tags{'ID'})
{
$formData[0]{'PAGENAME'} = $pageName;

my $empId = $All_tags\{'ID'\};
my $empName;

my $sql = "SELECT NameFROM Employees  WHERE Emp_Id = '$empId'";
my $sth = $dbh->prepare\($sql\);
$sth->execute\(\);
$sth->bind_columns\(\\$empName\);
$sth->fetch;
$formData[0]\{'EMP_ID'\}=$empId;
$formData[0]\{'EMP_NAME'\}=$empName;
 $sth->finish;

}
else
{
$formData[0]{'PAGENAME'} = $pageName;
}

HTML:: printHeaderDetails($pageName);
HTML:: printHeaderDetails($pageName);
template::displayTemplate($templateToUse, @formData);
HTML:: printFooterDetails();

$dbh->disconnect();
}