-
5 votesanswersviews
如何在使用DBI的Perl模块中获得100％的测试覆盖率？
我对Devel :: Cover模块有点新，但发现它确保我没有错过测试非常有用 . 我遇到的一个问题是了解Devel :: Cover的报告 . 我查看了文档，但无法弄清楚我需要测试什么才能获得100％的覆盖率 . 编辑 - 我应该说清楚我并不是说我需要100％的覆盖率，因为正如多人指出的那样，100％的覆盖率是一个松散的术语，并不意味着我的代码没有错误，并且可能并不总是完全没有必要 . 由于我... -
0 votesanswersviews
使用DBI和DBD抑制连接错误：ODBC SQL Server Native Client 10.0
编写脚本以从表中获取SQL Server实例名称，然后尝试连接到每个这些实例以回退数据库配置信息 . 涉及的所有数据库实例都是某个版本的SQL Server . 如果连接失败（由于密码错误，实例关闭等），目的是打印用户定义的错误消息（“无法连接到$ inst，跳过 . ”）并继续浏览列表 . 我在从ODBC（SQL Server Native Client 10.0）中抑制默认错误消息时遇到问题 ... -
1 votesanswersviews
如何确保查询成功执行
我需要执行一个select语句查询并捕获返回的结果并将其存储在一个变量中 . 执行不返回任何数据 . 我检查了我的连接是否正确，因为它没有返回任何错误 . $ dbh = DBI-> connect（$ data_source，$ username，$ password）或die $ DBI :: errstr; 以下是我的查询 my $sth = $dbh->prepare('s... -
1 votesanswersviews
使用CPANM安装DBI模块和DBD :: Oracle驱动程序
所以基于我在stackoverflow上给出的指令，我试图使用perlbrew在我的64位Solaris虚拟机上安装新版本的Perl，以便最终安装'cpanm'并安装CGI和DBI模块，以及DBD :: Oracle驱动程序 . 这些是我遵循的步骤： 1）安装gcc和其他构建工具 . 2,3）安装perlbrew ... 4）安装新的Perl 在忽略Socket.pm中的测试失败后，成功安装了Pe... -
0 votesanswersviews
如何在Perl中使用嵌入式MySQL？
我安装了带有 --force-embedded 标志的DBD::mysql模块并尝试了这个 use warnings; use strict; use DBD::mysql; my $dsn = "DBI:mysqlEmb:database=test;mysql_embedded_options=--help,--verbose"; my $dbh = DBI->co... -
0 votesanswersviews
无法在Windows上为Teradata安装perl DBI
我在Windows上安装了草莓perl，我需要Teradata驱动程序 . 我从这里下载了包：http://www.presicient.com/tdatdbd/ . 我遇到了Windows安装说明后的问题： cd到你解开DBD-Teradata-XXX.tar.gz文件的任何地方，然后cd到DBD-Teradata-XXX目录 . 运行通常的Perl包安装过程，即perl Makefile.PL... -
2 votesanswersviews
ERROR OCIEnvNlsCreate . 检查ORACLE_HOME（Linux）env var或PATH（Windows）和/或NLS设置，权限等
我有perl脚本使用DBD :: Oracle来运行查询并打印结果 . 当我尝试通过apache或终端访问时，我收到相同的错误 . ERROR OCIEnvNlsCreate . 检查ORACLE_HOME（Linux）env var或PATH（Windows）和/或NLS设置，权限等 . 所以我设置了ORACLE_HOME环境变量，它在终端上工作正常，但apache抛出相同的东西 . 有什么建... -
5 votesanswersviews
当我尝试连接到Oracle 11g时，为什么Perl的DBI会抱怨“失败：错误OCIEnNN创建”？
我使用简单的Perl脚本连接到Oracle 11g数据库时出现以下错误： failed: ERROR OCIEnvNlsCreate. Check ORACLE_HOME (Linux) env var or PATH (Windows) and or NLS settings, permissions, etc. at 脚本如下： #!/usr/local/bin/perl use str... -
-4 votesanswersviews
DBI的Perl API版本v5.14.0与/usr/lib64/perl5/DynaLoader.pm中的v5.16.0不匹配
当我在Linux中运行perl脚本时，我遇到了这个异常 . 我不是perl的专家，我已经搜索了一个解决方案，他们都想重建/重新安装perl，我也没有访问权限 . 所以有人可以告诉你该做什么而不重建？ edit: output of perl -V perl：警告：设置区域设置失败 . perl：警告：请检查你的语言环境设置lc_all =（unset）language =（unset） -
0 votesanswersviews
Perl CGI没有正确运行sql
我正在开发一个基本的注册页面，但我似乎无法通过用户名检查来触发或实际插入数据库 . 在这个页面中，我从我的html页面中获取了我传递的信息，并首先检查用户名是否已经存在 . 如果不是我重定向 . 否则，我将值插入数据库并重定向到新页面 . 我得到的输出是这样的： 我无法在代码中找到实际问题 . #!/usr/bin/perl #This is going to be the user login... -
1 votesanswersviews
如何使用Perl DBI检索DB2 SQL sproc的返回值？
我需要检索我编写的DB2 sproc返回的值 . sproc返回表中的行数，并由调用进程用于决定是否更新其他数据 . 我在SO上查看了几个类似的问题，但是它们引用了out参数而不是使用sproc的返回值，例如： Perl Dbi and stored procedures 我正在使用与数据库的标准DBI连接，同时启用了RaiseError和PrintError . $sql_stmt = &qu... -
1 votesanswersviews
减少DBI :: common :: Fetch（Perl）的调用
我一直在努力减少我创建的程序的运行时间 . 我使用了一个Profiler，它告诉我63％的时间花在了DB :: st :: execute上 . 然后我运行了一个DBI Profiler，发现我的哪些通话耗时最长： + 1 SELECT Gene FROM genotypegene WHERE Genotype like ? = 754 0.163602352142334 0 0 0.015600... -
1 votesanswersviews
在对DBI进行子类化时，Perl DBI将SQLite DB cache_size设置为写入操作
我有一个Perl程序，我们在过去两年中每天都成功运行，但今天崩溃的错误消息： FATAL ERR：无法执行PRAGMA cache_size = 1000000：尝试编写只读数据库 有问题的SQLite数据库是readonly，并且一直都是，并且代码在打开readonly连接后立即使用 PRAGMA cache_size = 1000000 . 设置cache_size不是写操作，如果我通过... -
4 votesanswersviews
MySQL比PostgreSQL（在Perl / DBI下）更能抵抗SQL注入攻击吗？
我正在审查一个基于Linux的perl Web应用程序，它包含一个无处不在的登录处理程序 我的$ sth = $ DB-> prepare（“从密码中选择密码，其中userid ='$ userid'”）或死; $ sth->执行或死亡; ... 其中$ userid是从（不安全，未经过滤的）Web用户输入初始化的 . 众所周知，DBI文档建议应该更改此代码以使用占位符“？”取代'$ ... -
0 votesanswersviews
Perl DBI - 获取影响事务中每个语句的记录
HI， 我使用perl DBI do（），它将执行下面的SQL块，如下所示，它在SQL SERVER 2005中执行 eval {my $ result = do（<< SQL）;开始了 UPDATE table1 SETcol1 = 999其中date ='2010-08-27' 从table1中删除where date ='2010-08-30' COMMIT TRANSQL$... -
8 votesanswersviews
从PERL中的DBI语句转储准备的sql查询
我在Perl中使用DBI连接到我的PostgreSQL数据库 . 一切正常，但在我的调试（打印结果等）中，我无法看到perls DBI模块准备的查询是否真的正确 . 我有这样的事情： $sth->prepare( qq{SELECT * FROM company WHERE companyname LIKE ? AND city = ?}); $sth->execute( $name.... -
2 votesanswersviews
当trace中的语句返回1时，为什么perl DBI返回0行
本周我第一次与perl DBI合作 . 大多数查询/插入工作正常，但是我遇到了一个返回0行的特定查询的问题 . 当我为perl DBI启用跟踪，并将跟踪中完全相同的语句复制到服务器（通过HeidiSQL）时，返回1行 . 原始SQL查询中是否存在歧义？目的是检索具有最新时间戳的行 . 时间戳列中没有重复项 . 数据库连接的初始设置： $dsn = 'dbi:mysql:<servername... -
1 votesanswersviews
DBI缓存的语句消失了，CGI :: Session被卡住了
我正在使用Apache2.2（worker）/ mod_perl 2.0.4 / Apache :: DBI / CGI :: Session和Firebird RDBMS . 我还编写了CGI :: Session :: Driver :: firebird.pm来使用Firebird RDBMS . 数据库连接由Apache :: DBI汇集，并提供CGI :: Session {Handle...