PlPerl ODBC connect error question?

[tuanhoanganh <hatuan05@xxxxxxxxx>]

Can PLPerl make ODBC connect.
I have perl test connect. It work well
use DBI; 
my $h = DBI->connect(
ÂÂÂ 'dbi:ODBC:DRIVER=SQL Server;Server=127.0.0.1;Database=TEST;Uid=sa;Pwd=abc123ABC;Port=1433',

ÂÂÂ 'sa',
ÂÂÂ 'abc123ABC',
ÂÂÂ { AutoCommit => 1, RaiseError => 1, }
) or die "Did not connect to db.";
print join(',', $h->tables);

But in PLPerlu it has error

CREATE OR REPLACE FUNCTION test_connection()
 RETURNS void AS
$BODY$
use DBI;
my $dbh = DBI->connect(
ÂÂÂ 'dbi:ODBC:DRIVER=SQL Server;Server=127.0.0.1;Database=TEST;Uid=sa;Pwd=abc123ABC;Port=1433',
ÂÂÂ 'sa',
ÂÂÂ 'abc123ABC',
ÂÂÂ { AutoCommit => 1, RaiseError => 1, }
);

if ($DBI::errstr) {
ÂÂÂ die <<ERR;
Could not connect to database
$DBI::errstr
ERR
}
RETURN;
$BODY$
 LANGUAGE plperlu VOLATILE
 COST 100;
ALTER FUNCTION test_connection() OWNER TO postgres;

AND when i execute function

SELECT test_connection();

Here is error

ERROR: Could not connect to database
[Microsoft][ODBC SQL Server Driver][SQL Server]Changed database context to 'TEST'. (SQL-01000)
[Microsoft][ODBC SQL Server Driver][SQL Server]Changed language setting to us_english. (SQL-01000) [state was 01000 now 01S00]
[Microsoft][ODBC SQL Server Driver]Invalid connection string attribute (SQL-01S00)
SQL state: XX000
Context: PL/Perl function "test_connection"