$filename = pack 'H*', $filename;