connect to mysql using a different socket

my $dsn = "dbi:mysql:$db_name:$db_server:$db_port;mysql_socket=/san01/mysql/data1/mysql.sock";
my $dbh = DBI->connect($dsn, $db_user, $db_pass) or die "Unable to connect: $DBI::errstr\n";
my $qry = $dbh->prepare($query);
$qry->execute();