dbi

1热度

1回答

我创建了一个使用DBI包连接到MySQL数据库的Perl脚本。为了使它在哪里不一定是全部依赖安装，我创建一个独立的文件，其中包括与Par Packer (pp)所有依赖使用以下命令其他Linux平台上运行： pp -c -x -o myscript myscript.pl 的独立文件正常工作的机器，其中上它是在其他机器上创建的，但是在执行DBI - > connect（）的行中出现以下错误。

0热度

1回答

DBI得到的查询问题时，字符串包含R中

我使用发送此查询到MySQL数据库UTF-8字符以下功能： loadDataBudget <- function(korisnik, razinaLabel) { lapply(dbListConnections(dbDriver(drv = "MySQL")), dbDisconnect) # Connect to the database db <- dbConn

1热度

1回答

如何从R的sqlInterpolate函数中删除嵌入的引号？

我正尝试使用DBI::sqlInterpolate函数生成一堆SQL脚本，但随着脚本嵌入与R变量一起返回的引号，会不断获取SQL错误。这里是代码： > x<-'state_transtions' > y<-'transition_time' > script<-"select * from ?x WHERE DATE(?y)> DATE_SUB(NOW(), INTERVAL 1 DAY)"

-1热度

1回答

Perl5 DBI Mysql：获取last_insert_id的可靠方法

在我的代码中，我使用database->last_insert_id(undef,undef,undef,"id");来获取自动增量主键。这工作99.99％的时间。但偶尔会返回0值。在这种情况下，使用与INSERT语句的值类似的WHERE子句运行select将显示insert成功。指示last_insert_id方法未能获得正确的数据。这是一个已知的问题已知的修复？或者我应该跟踪每次调用las

0热度

2回答

如何检查Perl中fetchall_arrayref方法返回的行？

我想明白下面的代码段，特别是发生了什么事在4号线，5和6 我明白大部分，但似乎无法理解什么正在符合@$r != 1;完成4（不@$r表示返回的行数？），同样做什么用@$r[0]发生在线路5和@$rr[0]在第6行： 1 my $sth = $dbh->prepare(" a select statement "); 2 $sth->execute(); 3 my $r = $sth->fetc

0热度

1回答

DBIx :: Class和DBIx :: Abstract之间的区别？

我对perl非常陌生，我正在通过Perl ORM，我遇到了DBIx :: Class和DBIx :: Abstract，从我推断他们都似乎是ORM。我有什么不同吗？谢谢

0热度

1回答

读从MySQL数据库中的表为R

我试图用DBI包中的R读取从我的数据库表： mydb = dbConnect(MySQL(), user='root', password='*******', dbname='powercurve', host='127.0.0.1') dbReadTable(mydb,"3.4m140sco") 但显然表名称中的R是不允许的，因为我得到了错误： Error in .local(conn

1热度

1回答

如何在发生异常时访问数据库数据？

我有下面的代码： my $savepoint = $c->db->txn_scope_guard; return $self->render('subnet/create', error => [ create => [email protected] ], servers => $self->rows('Server')->lookup, ) unless $subnet = ev

3热度

1回答

是否从postgres数据库关闭DBI句柄释放锁

我正在尝试编写一个将在多个服务器上运行但共享单个数据库以进行金融交易的Web应用程序。简而言之，我想将资金从帐户A转移到B.但是可能会有多个请求从同一个帐户转帐。余额永远不会为负数，因此我决定使用SELECT FOR UPDATE来获取余额以锁定行。我使用JDBI用于向数据库的连接：http://jdbi.org/ 代码流程如下：控制器： DBI dbi = new DBI(datasou

-3热度

2回答

无法解析代码中的日期和流程是不会去while循环

#! /usr/bin/perl use DBI; use strict; use Data::Dumper; my $dbh = DBI->connect("DBI:DB2:xxx",'xxx','xxx',{ RaiseError => 0, AutoCommit => 1 }) or die ("Could not connect to database :".DBI->err