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.

Expand|Select|Wrap|Line Numbers

 
#!/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.

Expand|Select|Wrap|Line Numbers

#!/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.

Expand|Select|Wrap|Line Numbers

 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";

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

Post your reply

Similar topics