| 導購 | 订阅 | 在线投稿
分享
 
 
 

Perl操作mysql數據庫的方法

2008-12-22 08:07:47  編輯來源:互聯網  简体版  手機版  評論  字體: ||
 
  Perl對Mysql的操作。

  一、標准操作

  1、連接、關閉

  my $dbh = DBI->connect(」DBI:mysql:database=DBname;host=localhost」,」user」,」pwd」, {』RaiseError』 => 1});

  … …

  $dbh->disconnect();

  2、類似插入等無返回操作

  my $sqr = $dbh->prepare(」insert into table_name(Name,region_id,inuse,url) values (』」.$r_name.」『,』」.($t+1).」『,』1′,』」.$r_url.」『) 「);

  $sqr->execute();

  3、取得自增長的ID

  執行插入操作後

  my $table_key = $dbh->{』mysql_insertid』};

  4、Select操作

  my $row;

  while ($row = $sqr->fetchrow_arrayref) {

  printf $row->[0].」++」.$row->[1].」\n」;

  }
 
Perl對Mysql的操作。 一、標准操作 1、連接、關閉 my $dbh = DBI->connect(」DBI:mysql:database=DBname;host=localhost」,」user」,」pwd」, {』RaiseError』 => 1}); … … $dbh->disconnect(); 2、類似插入等無返回操作 my $sqr = $dbh->prepare(」insert into table_name(Name,region_id,inuse,url) values (』」.$r_name.」『,』」.($t+1).」『,』1′,』」.$r_url.」『) 「); $sqr->execute(); 3、取得自增長的ID 執行插入操作後 my $table_key = $dbh->{』mysql_insertid』}; 4、Select操作 my $row; while ($row = $sqr->fetchrow_arrayref) { printf $row->[0].」++」.$row->[1].」\n」; }
󰈣󰈤
 
 
 
>>返回首頁<<
 
 
 
 
 熱帖排行
 
王朝網路微信公眾號
微信掃碼關註本站公眾號 wangchaonetcn
 
  免責聲明:本文僅代表作者個人觀點,與王朝網絡無關。王朝網絡登載此文出於傳遞更多信息之目的,並不意味著贊同其觀點或證實其描述,其原創性以及文中陳述文字和內容未經本站證實,對本文以及其中全部或者部分內容、文字的真實性、完整性、及時性本站不作任何保證或承諾,請讀者僅作參考,並請自行核實相關內容。
 
© 2005- 王朝網路 版權所有