Add perl for 73 decode numbers