use strict;
use DBI;

# substitute your database for DATABASE and username and password
my $dbh = DBI->connect( "dbi:Oracle:DATABASE", "vroom", "perlmonks" );

my $statement = $dbh->prepare( "SELECT * from PERLER" );

$statement->execute();
my @row = $statement->fetchrow_array();

print @row;