未命名  

use strict;
use DBI;
my $dbh=DBI->connect("DBI:mysql:test","root","root");
print "create table xx select * from category";
my $sth=$dbh->prepare("create table ll select * from category");
$sth->execute();
$sth->finish;

$dbh->disconnect();

 

 

本文出自 “十年一刻” 博客,请务必保留此出处http://liveforlinux.blog.51cto.com/3337218/844915

創作者介紹
創作者 shadow 的頭像
shadow

資訊園

shadow 發表在 痞客邦 留言(0) 人氣()