... &ConfirmBox("OK : Le device " . $o_nom . "a été renommé " . $n_nom . " dans ManagIP."); ... ... # # You can use the javascript:alert instead # sub ConfirmBox { my ($Message) = @_; print "" }