shell - Perl code to connect to sybase DB throwing an Informational error -
i have perl code connect sybase db. when code run, code connects sybase. after successful connection, fires default sql query..."select @@ version" check version of db not valid in sybase , throws error. wanted stop query being fired no error received.
i not perl developer!
sub main::open_netcool { use vars qw($user $password $os); $os = (defined $os ) ? $os : $main::env{dsquery}; dbi->connect("dbi:sybase:server=$os", $user, $password, {raiseerror=>1, taint=>1, autocommit=>1} );
Comments
Post a Comment