my $message; if ($rv == 1){ $message = q(Record has been successfully updated !!!); }else{ $message = q(Error!!while inserting records); ## exit; } # return to html page my $URL = '/contactsform.html'; my $refresh = 5; print $q->header( -type=>"text/html", -expires=>"-1m" , -refresh=>"$refresh ; URL=$URL"); print $q->start_html, $q->p($message), $q->p( qq!This page returns to $URL in $refresh seconds, Click here to return now! ), $q->end_html;