You are registered since 10.07.2008, so by now you should have read How (Not) To Ask A Question. And if not, did you read I know what I mean. Why don't you?

Perl has no buttons. It has a reset operator, but no inputs of that type. It is possible to construct such things for web pages. What part of that task do you have problems with? what did you try?