perl 如何實現HMAC-MD5簽名？哪位大蝦幫忙解決下！最好有簡單實例阿！！

http://search.cpan.org/~gaas/Digest-HMAC-1.02/lib/Digest/HMAC_MD5.pm

沒用過，妳可以壹試

# Functional style

use Digest::HMAC_MD5 qw(hmac_md5 hmac_md5_hex);

$digest = hmac_md5($data, $key);

print hmac_md5_hex($data, $key);