From fdb3bfeaf46515631af432ce5182a4bbc1eb860a Mon Sep 17 00:00:00 2001 From: mattn Date: Tue, 15 Nov 2011 11:48:27 +0900 Subject: add DBI connect for mysql/oracle. --- template/perl/snip-dbi-connect-mysql.pl | 2 ++ template/perl/snip-dbi-connect-oracle.pl | 2 ++ 2 files changed, 4 insertions(+) create mode 100644 template/perl/snip-dbi-connect-mysql.pl create mode 100644 template/perl/snip-dbi-connect-oracle.pl (limited to 'template/perl') diff --git a/template/perl/snip-dbi-connect-mysql.pl b/template/perl/snip-dbi-connect-mysql.pl new file mode 100644 index 0000000..426feee --- /dev/null +++ b/template/perl/snip-dbi-connect-mysql.pl @@ -0,0 +1,2 @@ +my $dbh = DBI->connect("dbi:mysql:{{_cursor_}}", "", ""); +$dbh->disconnect; diff --git a/template/perl/snip-dbi-connect-oracle.pl b/template/perl/snip-dbi-connect-oracle.pl new file mode 100644 index 0000000..d0e2765 --- /dev/null +++ b/template/perl/snip-dbi-connect-oracle.pl @@ -0,0 +1,2 @@ +my $dbh = DBI->connect("dbi:Oracle:{{_cursor_}}", "", ""); +$dbh->disconnect; -- cgit v1.2.3-54-g00ecf