From 01776c9e52c63662403dcb19155ffe3bc8a035ee Mon Sep 17 00:00:00 2001 From: Mitch Jackson Date: Sun, 3 Mar 2019 19:42:10 -0500 Subject: RT# 82942 Replace DBI->connect() with FS::DBI->connect() --- bin/aradial-sftp_and_import | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'bin/aradial-sftp_and_import') diff --git a/bin/aradial-sftp_and_import b/bin/aradial-sftp_and_import index 668ec49ba..e7639633a 100755 --- a/bin/aradial-sftp_and_import +++ b/bin/aradial-sftp_and_import @@ -8,6 +8,7 @@ use Date::Parse; use Date::Format; use Text::CSV_XS; use DBI qw( :sql_types ); +use FS::DBI; use Net::SFTP::Foreign; #use FS::UID qw( adminsuidsetup datasrc ); @@ -81,8 +82,8 @@ mkdir $cachedir unless -d $cachedir; my $servername = shift or die &usage; my( $datasrc, $db_user, $db_pass ) = ( shift, shift, shift ); -my $dbh = DBI->connect( $datasrc, $db_user, $db_pass) - or die "can't connect: $DBI::errstr\n"; +my $dbh = FS::DBI->connect( $datasrc, $db_user, $db_pass) + or die "can't connect: $FS::DBI::errstr\n"; my $csv = Text::CSV_XS->new; -- cgit v1.2.1