perl CGI如何实现弹出窗口?

perl CGI如何实现弹出窗口?

请教一下:
想实现当用户在浏览器点击submit按钮后,马上弹出一个小窗口(不是新开一个浏览器窗口,而是那种灰色的弹出对话框),问用户是否确定,用户可以选择是或否,如果选是,就执行表单里定义的action,如果选否,则不执行表单里定义的action, 仍然停留在原来的页面。  
多谢各位!
大哥……这是用JS做的啊……
我知道用javascript可以实现,我想知道用perl能不能实现相同的功能。
我研究了半天没研究出来。
用perl也是调用JS做
这个不是研究不研究的问题……你要知道CGI是怎么工作的。

首先浏览器是解释HTML的,它不懂Perl;
其次CGI是输出HTML交给浏览器解释。

所以CGI跟浏览器是没什么关系的。除非你指的是其他的效果,那我就不清楚了。
pop_up ?
我的概念混淆了,ubac, JasonLee8872, 多谢二位!
JS是client-side, perl是server-side,应该用perl调用JS来实现。
perl为什么不开发client-side呢? 可能是多余吧,不知道。