位置: 编程技术 - 正文

Perl Mysql数据库操作实现代码(perl-dbd-mysql是什么)

编辑:rootadmin
一. 安装DBI模块 步骤1: 从TOOLS栏目中下载DBI.zip,下载完后用winzip解开到一个temp目录,共有三个文件: Readme DBI.ppd DBI.tar.gz 步骤2: 在DOS窗口下,temp目录中运行下面的DOS命令: ppm install DBI.ppd 如果提示无效命令,可在perl/bin目录下运行 二. 安装DBD-Mysql模块 从软件下载中下载DBD-Mysql.zip,安装方法同一. 三. 准备数据库 启动mysql,首先创建一个数据库mydata,然后创建一个表address mysql> create database mydata; Query OK, 1 row affected (0. sec) mysql> use mydata; Database changed mysql> create table address ( -> id int(5) not null, -> name varchar() not null, -> email varchar() not null, -> telephone int() null); Query OK, 0 rows affected (0. sec) 输入些数据: mysql> insert into address values ( -> 1,'Nighthawk','nighthawk@.net',); Query OK, 1 row affected (0. sec) 四. 下面用perl程序来插入若干记录并做查询. use DBI; #连接数据库mydata my $dbh = DBI->connect('DBI:mysql:mydata') or die "无法连接数据库: " . DBI->errstr; print "插入若干记录n"; my $sth = $dbh->prepare(q{ INSERT INTO address (id, name,email,telephone) VALUES (?, ?, ?, ?) }) }); print "输入记录,回车结束:"; while ($inputdata =<>) { chop $inputdata; last unless($inputdata); my ($id, $name,$email, $tel) = split( /,/, $inputdata); $sth->execute($id, $name, $email,$tel) } # $dbh->commit; print "下面根据输入的名字打印出EMAIL地址和电话n"; my $sth = $dbh->prepare('SELECT * FROM address WHERE name=?') or die $dbh->errstr; print "请输入姓名,回车结束:"; while ($inputname =<>) { my @data; chomp $inputname; last unless($inputname); $sth->execute($inputname) or die "错误: " . $sth->errstr; while (@data = $sth->fetchrow_array()) { print "Email:$data[2]t Telephone:$data[3]n"; } } #断开连接 $dbh->disconnect; Nighthawk

推荐整理分享Perl Mysql数据库操作实现代码(perl-dbd-mysql是什么),希望有所帮助,仅作参考,欢迎阅读内容。

Perl Mysql数据库操作实现代码(perl-dbd-mysql是什么)

文章相关热门搜索词:mysql pri,perl连接数据库,percona mysql,perl-dbd-mysql,percona mysql,perl-dbd-mysql,perl-dbd-mysql,perl-dbd-mysql,内容如对您有帮助,希望把文章链接给更多的朋友!

PERL 正则表达式详细说明 PERL里正则表达式的简介一、简介二、匹配操作符三、模式中的特殊字符1、字符+2、字符[]和[^]3、字符*和?4、转义字符5、匹配任意字母或数字6、锚模式7

python 获取命令行参数 函数 importsysprintsys.argvprintlen(sys.argv)#参数个数printsys.argv[1]#第一个参数printsys.argv[2]

Perl5 OOP学习笔记第1/2页 在学习了Perl的基本语法之后,学习Perl的OOP,略有心得。不知道Perl各个版本之间OOP是否有区别,但是我是学习的Perl5,所以在标题上将版本号也写出来了

标签: perl-dbd-mysql是什么

本文链接地址:https://www.jiuchutong.com/biancheng/372444.html 转载请保留说明!

上一篇:Perl ASCII 字符判断(perl判断字符串相等)

下一篇:PERL 正则表达式详细说明(perl 正则表达式 保留原有字符)

  • 小微企业年度所得税优惠政策
  • 抗税的性质
  • 必要收益率的取值可以是
  • 定期定额征收和核定征收一样吗
  • 股权转让实缴和认缴的区别
  • 计量的政府补助是什么
  • 哪些进项税额不可以抵扣
  • 办公费专票怎么做账
  • 增值税免税是否计入营业外收入
  • 办税员如何绑定企业
  • 实收资本未到位情况说明
  • 没有认证方式
  • 营改增后一般纳税人动产租赁税率
  • 补贴与工资薪金一起发放,属于福利费,还是纳入工资薪金总额税前扣除?
  • 发票涉税风险有哪些
  • 公司买汽车怎么做内账
  • 开票含税和不含税哪个划算
  • 研发人员的工会经费计入研发费用吗
  • 季报小微企业不包括哪些
  • 供热企业所使用的燃气
  • 当月已认证的可抵扣增值税
  • 销售额的意思
  • 工商年报的纳税总额怎么填写
  • 产值税收是什么意思
  • 因质量问题退货和收回的药品应当
  • 财政拨款结余的明细科目
  • 企业发生的培训费能否在所得税前扣除
  • psoft1.exe - psoft1是什么进程 有什么作用
  • 在win7系统中文件属性有哪些
  • 汽车维修的发票的购买方
  • 支付挂靠方的管理费用有进项吗?
  • WordPress导航菜单权限控制
  • 什么是融资租赁型校园贷
  • 交易性金融资产的交易费用计入哪里
  • 企业借款会计处理
  • 苏格兰高地牛一个萌萌哒的合集
  • 固定资产属于资产要素吗
  • 未确认融资费用怎么算
  • 工业企业制造费用占比
  • 小规模纳税人交税怎么做会计分录
  • thinkphp i方法
  • Midjourney之外21款免费的AI Image画图网站集合
  • 路径规划的基本流程和方法
  • java基础笔试题在线考
  • 应收保费核算什么
  • 纳税人购进固定资产一次性扣除账务处理
  • 第三方车行
  • 自来水适用3%税率还是9%税率
  • 辞退员工补偿金怎么计算
  • 公司不可以销售车辆吗
  • 金税四期上线后如何查虚开
  • 个税专项附加扣除标准调整
  • 公司出售二手车要交哪些税
  • 营改增行业销售额的确定
  • 货物什么情况下需要分批运输
  • 经费开支要求
  • 非税收入如何退款
  • 资固定资产清理
  • 管理费用科目余额表有余额怎么办
  • 确定所开发票的项目的大类别?
  • 开票方与付款方不一致问题
  • windows xp windows
  • hyper-v怎么样
  • linux网络管理及应用
  • winxp的控制面板在哪里
  • postgres.exe是什么进程 postgres进程查询
  • Windows7如何查看电脑配置
  • window预览
  • windows8如何进入bios
  • div与span区别及用法
  • redhat linux6.5安装教程
  • javascript数据结构
  • jquery源码是什么水平
  • Android性能优化工具
  • Windows上安装Python
  • activity的跳转
  • pythonstl
  • 红字专用发票进什么科目
  • 陕西省国家税务总局班子成员
  • weverse登录不了
  • 免责声明:网站部分图片文字素材来源于网络,如有侵权,请及时告知,我们会第一时间删除,谢谢! 邮箱:opceo@qq.com

    鄂ICP备2023003026号

    网站地图: 企业信息 工商信息 财税知识 网络常识 编程技术

    友情链接: 武汉网站建设