This is not a perl question. Your question is about HTML/Javascript, but the problem itself is not solvable by Javascript like this.
A robot just submits the form. It doesn't care if there is any Javascript in the HTML which does something with the submit button. The only way to make the robots' life more difficult is to demand something "intelligent" from the user. Like captchas do.