use DBI;
use Path::Tiny 'path';
...
my $dbname = path '//server/share/whatever/it is.mdb';
$dbh = conn $dbname->canonpath;
...