[oracle@yyjk tmp]$ cat check_oracle.pl
use DBI;
use Crypt::RC4::XS;
use HTTP::Date qw(time2iso str2time time2iso time2isoz);
use Net::SMTP;
use Encode;
use JSON;
use Sys::SigAction qw( set_sig_handler );
use Net::Ping;
use POSIX;
no warnings;
my $dbName =服务器托管网 ‘tlyy’;
my $dbUser = ‘tlcbuser’;
my $dbUserPass = ‘xxxxx’;
my $XDATE = strftime(“%Y%m%d%H%M%S”,localtime());
my $dbip=’192.168.137.1′;
$dbh1 = DBI->connect( “dbi:Ora服务器托管网cle://$dbip:1521/$dbname”, $dbuser, $dbpass ) or die “Cannot conenct db: $DBI::errstrn”;
[oracle@yyjk tmp]$ time perl check_oracle.pl
DBI connect(‘//192.168.137.1:1521/’,”,…) failed: ORA-12170: TNS: 连接超时 (DBD ERROR: OCIServerAttach) at check_oracle.pl line 16.
Cannot conenct db: ORA-12170: TNS: 连接超时 (DBD ERROR: OCIServerAttach)
服务器托管，北京服务器托管，服务器租用 http://www.fwqtg.net
相关推荐: Spring Boot+RocketMQ 实现多实例分布式环境下的事件驱动
为什么要使用MQ？ 在Spring Boot Event这篇文章中已经通过Guava或者SpringBoot自身的Listener实现了事件驱动，已经做到了对业务的解耦。为什么还要用到MQ来进行业务解耦呢？ 首先无论是通过Guava还是Spring Boot自…
