Perl SQL Update

Submitted by:Jhon Smith

Date added:15 June, 2014


Example for updating a record in a database with perl and the DBU module.

Tags: sql update , perl database , dbu module

Code Snippet:


# Use the DBI module

# PERL SQL Update Example

MY $dsn = '';
MY $db_user_name = 'ssadmin';
MY $db_password = 'dictionary';
MY $password = "dictionary";

# Connect to the database
# Note this connection can be used to
# execute more than one statement
# on any number of tables in the database

MY $dbh = DBI->connect($dsn, $db_user_name, $db_password) || DIE "Connect failed: $DBI::errstr\n";

# Create the statement.

$stmt = "UPDATE Player_Stats SET total_games_played = '199' WHERE username LIKE '%joe'";

# Prepare and execute the SQL query
$sth = $dbh->prepare($stmt) || DIE "prepare: $stmt: $DBI::errstr";

# Execute the statement


PRINT "Content-type: text/html\n\n";

PRINT "Done!";