how to insert a query into MYsql Db residing on my local host

[koti688]

Hi Guys, I am a beginner to perl.
I need a perl package which will perform basic DB operations like select , insert,update,delete operation MySql DB.

i Have a Mysql DB which resides on my local machine.DB Deatils are :
Localhost,MySql,DatabaseName:perltest, username:root,pwd:sierra,table:samples with coulms :id,name,phone

I am done with selecting the rows in DB. I need Sample code for inserting , updating and deleting . Please provide some basic infor regarding these.

#!/usr/bin/perl -w 
 
use DBI; 
 
$dbh = DBI->connect('dbi:mysql:perltest','root','sierra') 
 
or die "Connection Error: $DBI::errstr\n"; 
 
$sql = "select * from samples"; 
 
$sth = $dbh->prepare($sql); 
 
$sth->execute 
 
or die "SQL Error: $DBI::errstr\n"; 
 
while (@row = $sth->fetchrow_array) { 
 
print "@row\n"; 
 
}
 

Similarly i Need code for Inserting and updating and deleting operations and all these functions as a package. Can guyz help me in how to proceed for these things.

You can mail me ur proceeding to this id EMAILS REMOVED

Thanks in Advance
Koti.

[nithinpes]

Hi Guys, I am a beginner to perl.
I need a perl package which will perform basic DB operations like select , insert,update,delete operation MySql DB.

i Have a Mysql DB which resides on my local machine.DB Deatils are :
Localhost,MySql,DatabaseName:perltest, username:root,pwd:sierra,table:samples with coulms :id,name,phone

I am done with selecting the rows in DB. I need Sample code for inserting , updating and deleting . Please provide some basic infor regarding these.

#!/usr/bin/perl -w 
 
use DBI; 
 
$dbh = DBI->connect('dbi:mysql:perltest','root','sierra') 
 
or die "Connection Error: $DBI::errstr\n"; 
 
$sql = "select * from samples"; 
 
$sth = $dbh->prepare($sql); 
 
$sth->execute 
 
or die "SQL Error: $DBI::errstr\n"; 
 
while (@row = $sth->fetchrow_array) { 
 
print "@row\n"; 
 
}
 

Similarly i Need code for Inserting and updating and deleting operations and all these functions as a package. Can guyz help me in how to proceed for these things.

You can mail me ur proceeding to this id EMAILS REMOVED

Thanks in Advance
Koti.

The examples will be available in the documentation for DBD::MySQL in search.cpan.org.
You may go through this link

[numberwhun]

Please DO NOT include any email addresses or contact information in the technical forums. This information is easily scraped by web spiders. This policy exists for your protection. Please read the Posting Guidelines for this site so you are aware of what to and not to do.

Regards,

Moderator

[Icecrack]

well first off this question isn't related to Perl, but to mysql statements

for example look at the var $sql see what has changed from the code you posted.

use DBI; 
 
$dbh = DBI->connect('dbi:mysql:perltest','root','sierra') 
 
or die "Connection Error: $DBI::errstr\n"; 
 
$sql = "INSERT INTO $tablename (custid, name, repcode, state, contact, phone, warn) VALUES ('$customerid','$customername','$repcode','$state','$contact','$tel','$warnnote') "; 
 
$sth = $dbh->prepare($sql); 
 
$sth->execute 
 
or die "SQL Error: $DBI::errstr\n";