Update binary.perl