#!/usr/local/bin/perl

use DBI;
use Oraperl;
$ENV{"ORACLE_HOME"} = "/opt/oracle/product/9.2.0";

$dbh = DBI-> connect("dbi:Oracle:host=algunhost;sid=algunsid", "schema", "secreto");
DBI-> errstr;

my $var =$ENV{"REMOTE_ADDR"};

$statement = "insert into some_table(column) values($var)";

$sth = $dbh->prepare($statement);
$rv = $sth->execute;

$sth->finish;

$dbh->disconnect;