Help for this page
length($foo)-grep(1+index(((1e9/.7)^7*13*89)."\_",$_),map chr($_),unpa +ck"C*",$foo) == length("\Q$foo")-length($foo)