1
Abre tu compilador de Perl y abra el archivo de código fuente . Agregar las bibliotecas de la parte superior del archivo para incluir los scripts CGI Ajax. Agregue el código siguiente al principio del archivo : Usa
 CGI , mi $ cgi = CGI - > new (); main () ; 
 2 
 Agregue el código Ajax . Por ejemplo , el código siguiente recupera un nombre de usuario en un cuadro de texto cuando el usuario hace clic en un botón de envío : 
 
 $ user = $ cgi -> param ( 'username' ) 
 3 
 mostrar los resultados en la página web. El siguiente código utiliza Perl para mostrar los resultados en la pantalla del usuario : 
 
 HTMLPrint $ cgi -> header () , print $ html ; 
 
 
          
