How to Connect to MYSQL?

[MRPerl]

Hello,
I can't find any tutorials on how to connect to a MYSQL Database. Any help would be appreciated.
Thank you

[gish]

This will connent to the db.


use DBI;
use DBD::mysql;
$dsn = "DBI:mysql:database=your_database_name";
$user = "username";
$pass = "password";

#connect
$_[0] = DBI->connect($dsn,$user,$pass) || die "couldn't connect! $DBI::errstr

#disconnect
$_[0]->disconnect;

[imported_scavok]

any chance of an example of how to create a table/variable/value?

I'm decent with perl but never used it with MYSQL before but would like to learn!

thanks!