今天在linux上用perl鏈接sqlserver，執行存儲過程，獲取一個結果集

#!/usr/bin/perl use DBI; use Data::Dumper; $dbh=DBI->connect('dbi:ODBC:TEST','perf_gather',‘1234567’); my $hash_row = $dbh->selectrow_hashref("exec DBA.Insert_Performance_counter"); print Data::Dumper

>>阅读原文<<