samer@7: % md5file - Use md5sum to compute md5 hash
samer@7: % md5file :: string ~'filename' -> string ~'hash'.
samer@4: function hash=md5file(fn)
samer@4: 	[rc,result]=system(sprintf('md5sum -b "%s"',fn));
samer@4: 	if rc==0
samer@4: 		sp=find(result==' ');
samer@4: 		hash=result(1:sp);
samer@4: 	else
samer@4: 		error('Error running md5sum');
samer@4: 	end
samer@4: end