Ja das habe ich kurz zusammen getippt. Das ist nicht schwer, wenn man so was schon häufiger gemacht hat.
Es sind mit Sicherheit noch Fehler drin.

Was mir gerade auffällt: Zeile 6: "DBI:mysql:$db"; Das wird einen Fehler geben. $db muss durch den DB-Namen ersetzt werden.