read FILNAM, $_, 16;
$val = unpack 'H32';

##</code><code>##

$val = unpack 'H32', (read (FILNAM, $_, 16));