Πώς να χρησιμοποιήσετε Ajax με Perl

Η γλώσσα Ajax σας επιτρέπει να ανακτήσετε ασύγχρονα και την αποστολή δεδομένων στην ιστοσελίδα σας . Αυτό σημαίνει ότι η σελίδα δεν ανανεωθεί όταν υποβάλλετε τα στοιχεία χρησιμοποιώντας τη γλώσσα Ajax σε Perl . Perl χρησιμοποιεί τα " CGI " λειτουργίες που χρησιμοποιούν Ajax από Perl σελίδες. Ajax είναι συνήθως χρησιμοποιούνται για την επεξεργασία των μορφών , χωρίς να ανανεώσετε τη σελίδα ή το άνοιγμα εξωτερικής ιστοσελίδας και προβολή των αποτελεσμάτων στην τρέχουσα σελίδα . Οδηγίες
Η 1

Ανοίξτε Perl compiler σας και ανοίξτε το αρχείο πηγαίου κώδικα . Προσθέστε τις βιβλιοθήκες στην κορυφή του αρχείου να περιλαμβάνει τα CGI scripts Ajax . Προσθέστε τον ακόλουθο κώδικα στο επάνω μέρος του αρχείου :

χρήση CGI ? $ Μου cgi = CGI - > νέο ( ) ? Main () ? 2

Προσθέστε τον κώδικα Ajax . Για παράδειγμα , ο παρακάτω κώδικας ανακτά ένα όνομα χρήστη από ένα πλαίσιο κειμένου όταν ο χρήστης κάνει κλικ σε ένα κουμπί υποβολής :

$ user = $ cgi - > param ( « όνομα χρήστη » )
εικόνων 3

Εμφάνιση των αποτελεσμάτων στην ιστοσελίδα . Ο κώδικας που ακολουθεί χρησιμοποιεί Perl για να εμφανίσει τα αποτελέσματα στην οθόνη του χρήστη :

HTMLPrint $ cgi - > header () ? Print $ html ?
Η
εικόνων