perl mysql 程序_perl一个简单mysql操作的小程序

perl一个简单mysql操作的小程序

#!/usr/bin/perl

use Mysql;

print "Content-type:

text/html \n\n";

# MySQL

配置变量

$host = "localhost";

$database

= "testdb";

$tablename = "testtable";

$user = "username";

$pw =

"password";

# PERL MYSQL CONNECT()

$connect = Mysql->connect($host,

$database, $user, $pw);

# SELECT

DB

$connect->selectdb($database);

# 定义MySQL查询

$myquery = "INSERT

INTO

$tablename (id, product, quantity)

VALUES

(DEFAULT,'pineapples','15')";

# 执行查询

$execute =

$connect->query($myquery);

# 影响行

$affectedrows =

$execute->affectedrows($myquery);

# 最后一个Insert的ID

$lastid =

$execute->insertid($myquery);

print $affectedrows."

/>";

print $lastid."
";

相关文档：

MSSQL:select Right(sys.fn_VarBinToHexStr(hashbytes('MD5', '123456')),32)

MSSQL16位:select Right(sys.fn_VarBinToHexStr(hashbytes('MD5', '123456')),16)

MySQL:select md5('123456')

.NET:string 结果字符串=System.Web.Security.FormsAuthentication.HashPasswordForStoringInConfigFil ......

1、在mysql 数据库中，“2009-09-15 00：00：00”转化为列为长整型的函数：

select unix_timstamp("2009-09-15 00：00：00")*1000,

这里要注意，mysql数据库中的长整型，比java中的长整型少了秒后面的毫秒数，所以要乘以1000，这样只有几毫秒之差

2、在mysql数据库中，“1252999488000”� ......

一:安装

无论你喜欢的是哪种LINUX套件，它都有可能带有MySQL。Slackware,Ret Hat,SusE和Debian中都在它们的当前版本中包含了它，这将提供一种最简单的方式来快速安装和运行MySQL。如果你的发行版本中没有提供MySQL软件包，或者你想得到最新的版本，你可以从MySQL的网站:www.mysql.com上下载二进制包或� ......

一、建表

DROP TABLE IF EXISTS `user`;

CREATE TABLE `user` (

`ID` int(11) NOT NULL auto_increment,

`NAME` varchar(16) NOT NULL default '',

`REMARK` varchar(16) NOT NULL default '',

PRIMARY KEY  (`ID`)

) ENGINE=InnoDB AUTO_INCREMENT=24 DEFAULT CHARSET=utf8;

&nb ......

基本的MySQL语句很简单，这里主要谈谈一些容易遗忘的。

1.如何设置字段递增

create table tb_User(Id int auto_increment

not null primary key,UserName varchar(50),Password varchar(20));

2.查看表结构

desc tb_User;

3.如何修改表结

重命名表：alter table tb_User rename

tb_UserInfo;

添加一列：alter ta ......