X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=include%2Fnms.pm;fp=include%2Fnms.pm;h=bfb88ad5917af5de6d1d8424f9078e9402399e57;hb=e86389d7be5cd9e780b3b7d04316133bbbaafacf;hp=0000000000000000000000000000000000000000;hpb=9a9f0ce3aeebc04ff7fd56989ace9a737b0879cf;p=nms

diff --git a/include/nms.pm b/include/nms.pm
new file mode 100644
index 0000000..bfb88ad
--- /dev/null
+++ b/include/nms.pm
@@ -0,0 +1,24 @@
+#! /usr/bin/perl
+use strict;
+use warnings;
+use DBI;
+package nms;
+
+BEGIN {
+	require "config.pm";
+	eval {
+		require "config.local.pm";
+	};
+}
+
+sub db_connect {
+	my $dbh = DBI->connect("dbi:Pg:" .
+				"dbname=" . $nms::config::db_name .
+				";host=" . $nms::config::db_host,
+				$nms::config::db_username,
+				$nms::config::db_password)
+	        or die "Couldn't connect to database";
+	return $dbh;	
+}
+
+1;