Assuming that the table has a unique id, you can do something like the following:

$dbh = DBI->connect($DSN, $user, $passwd) || die "Cannot connect: $DBI
+:errstr\n";
$drh = DBI->install_driver("mysql");
...
$SQLText = "UPDATE gold SET amount = $Gold WHERE id = $goldID";
$sth    = $dbh->prepare($SQLText);
$query  = $sth1->execute;
[download]

You can find more information regarding Perl and MySQL here.

If things get any worse, I'll have to ask you to stop helping me.