use MD5 ();
$MAC = MD5->hexhash($secret .
       MD5->hexhash(join '', $secret, @fields));