Yes, you right. But you can look into Javascript code and simply implement same in Perl. Believe me it's not so hard :-).