@ArrayInMemory

$dbh->do("COPY mytable(col1, col2, col3) FROM STDIN WITH DELIMITER '/'");

foreach $row (@ArrayInMemory)
    {
       $dbh->pg_putcopydata($row);
    }
$dbh->pg_putcopyend();