perl 连接informix

  use DBI;  $ENV{"INFORMIXDIR"}="/xxx/xxxx";  $ENV{"INFORMIXSERVER"}="xxx";  $ENV{"DB_LOCALE"}="en_US.8859-1";  $ENV{"CLIENT_LOCALE"}="en_US.8859-1";  $dbh = DBI->;install_driver(‘Informix‘);  $dbh = DBI->;connect("dbi:Informix:$database",$user,$pwd)         || die ("Can‘t connect to $database");其中$database是你的dbspace名稱加上server名稱..例如: apile@informix 就是dbspace=apile, servername= informix$user，就是你的帳號$pwd，就是你的密碼..#!/usr/local/bin/perl -w use strict; use DBI; my $name="ad"; my $password="ad"; my $connect_str="dbi:informix:unicom\@hbdb"; my $dbh=DBI->connect($connect_str,$name,$password); if(!defined $dbh){   die "Cannot do \$dbh->connect: $DBI::errstr\n"; } else{ print "Successfully\n"; }