Shock horror Perl

Hi.  I want to create a hash value for a data structure, basically so that 
when I write the chart I'm creating with the routine to disk I can check 
if there's a recently created version already on disk before redoing the 
work.  Is there any accepted wisdom how to do this?

Ideas already considered:

 - Data dumper, then md5 it 
     won't work if the order of hash keys change (like it will when we 
     upgrade to 5.8.0 soonish

 - Storable, then md5 it
     Storable version changes write the data differently - hence bad
     keys for different versions.

This should be trivial.  Any ideas?

Later.

Mark.

-- 
s''  Mark Fowler                                     London.pm   Bath.pm
     http://www.twoshortplanks.com/              [EMAIL PROTECTED]
';use Term'Cap;$t=Tgetent Term'Cap{};print$t->Tputs(cl);for$w(split/  +/
){for(0..30){$|=print$t->Tgoto(cm,$_,$y)." $w";select$k,$k,$k,.03}$y+=2}


Reply via email to