Πώς να αλλάξει τη γραμμή του τίτλου σε Perl Script
Η γλώσσα προγραμματισμού Perl είναι μία από τις πιο διαδεδομένες γλώσσες προγραμματισμού ερμηνεύεται για τη δημιουργία δυναμικών ιστοσελίδων . Χρησιμοποιώντας Perl , οι προγραμματιστές μπορούν να αλλάξουν διεπαφές χρήστη της ιστοσελίδας με πολλούς τρόπους , για παράδειγμα , αλλάζοντας τις ετικέτες HTML , όπως το " " ετικέτα . Perl scripts τρέχουν στον web server , έτσι ώστε να απαιτούν ότι τα δεδομένα που έχει αναρτηθεί στο web server ώστε να αλλάξει δυναμικά στοιχεία της σελίδας . Ευτυχώς , Perl παρέχει ενσωματωμένες λειτουργίες που καθιστούν την ανάκτηση των πληροφοριών που ανακοινώνονται εύκολο . Τα πράγματα που θα χρειαστείτε <br> επεξεργαστή κειμένου <br> διακομιστή Web με Perl εγκατασταθεί και ρυθμιστεί σωστά <br> Η Εμφάνιση Περισσότερες οδηγίες <br> Η <p> 1 Ανοίξτε ένα πρόγραμμα επεξεργασίας κειμένου και να δημιουργήσει ένα αρχείο με το όνομα " ? perlTitle.pl " . Προσθέστε τη γραμμή " δουλεία " στο αρχείο στην πρώτη γραμμή . Η « δουλεία » καθορίζει τη θέση διερμηνέα Perl σε περίπτωση που δεν μπορεί να βρεθεί . Η γραμμή " δουλεία " θα είναι διαφορετική ανάλογα με τη συγκεκριμένη εγκατάσταση Perl . Ένα παράδειγμα φαίνεται παρακάτω : ! <br> <p> # /Usr /local /bin /perl 2 <br> <p> Αναφέρετε ότι perlTitle.pl πρέπει έξοδο μια ιστοσελίδα ( "text /html " ) εκτυπώνοντας το " Content-type " αξία " text /html " ( περιλαμβάνει τα " \\ n \\ n" χαρακτήρες ) . . Για να εκτυπώσετε εξόδου , χρησιμοποιήστε το "print " εντολή Perl και να εκτυπώσετε μια ανοιχτή και μια στενή " <html> " ετικέτα στην ιστοσελίδα <br> <p> εκτύπωσης " Content-type : text /html \\ n \\ n " ? print" <html> " ? print" </html > " ? <br> εικόνων 3 <p> Ανάκτηση οποιεσδήποτε τιμές στο query string . Οι τιμές " συμβολοσειρά ερωτήματος " είναι οποιεσδήποτε αξίες που υποβάλλονται με την ιστοσελίδα . Σε αυτό το παράδειγμα , η τιμή στο query string θα είναι ο τίτλος που χρησιμοποιείται για να αλλάξει τη γραμμή τίτλου . Αποθηκεύστε τις τιμές συμβολοσειράς ερωτήματος σε μια μεταβλητή που ονομάζεται " $ keyValue » δήλωσε μεταξύ ' s perlTitle.pl " <html> " και " </html > " tags : <br> <p> $ keyValue = ( $ ENV { « QUERY_STRING '} ) ? <br> Η 4 <p> Χρησιμοποιήστε τη λειτουργία Perl " διάσπαση " για να χωρίσει το ερώτημα string σε δύο τιμές ( $ key και $ value ) , τοποθετώντας τη διάσπαση αμέσως κάτω από το " $ keyValue " ? δήλωση. Σε αυτό το παράδειγμα , $ κλειδί είναι το όνομα της στοιχειοσειράς τίτλου ( «τίτλος») και $ αξία είναι η αξία της στοιχειοσειράς τίτλου . Χρησιμοποιήστε το " = " χαρακτήρα για να χωρίσει το " $ keyValue " string : <br> <p> ( $ name , $ value ) = διάσπαση ( /= /, $ keyValue ) ? <br> 5 <p> Χρήση η Perl " print" εντολή για να εκτυπώσετε το " $ value " μεταβλητή στην ιστοσελίδα . Να επισυναφθούν τιμή της μεταβλητής μεταξύ ανοικτών " <title> " και κοντά " " ετικέτες HTML :
print "
$ value " ? Η 6
Χρησιμοποιήστε την Perl "print " εντολή για να εκτυπώσετε ένα "
" ετικέτα για να συμπληρώσετε τη φόρμα που ο χρήστης θα υποβάλει :
print "
" ? Η 7
Χρησιμοποιήστε το "print " εντολή Perl για να εκτυπώσετε ένα έγγραφο HTML " " πεδίο στην ιστοσελίδα . Δώστε το πεδίο εισαγωγής του " τύπου " αξία " κείμενο" , το "όνομα " αξία " τίτλος " και κλείστε το " " ετικέτα . Χρησιμοποιήστε το Perl "print " εντολή για να εκτυπώσετε ένα δεύτερο HTML " " στην ιστοσελίδα με ένα " είδος " αξία " αποστολή" . Τοποθετήστε τα δύο " print" εντολές μεταξύ του "
" ετικέτες και να αποθηκεύσετε και κοντά perlTitle.pl . Μετά το βήμα 7 , perlTitle.pl θα εμφανιστεί όπως φαίνεται παρακάτω :
Open perlTitle . pl σε ένα πρόγραμμα περιήγησης στο web . Πληκτρολογήστε μια τιμή στο πεδίο εισαγωγής , κάντε κλικ στο κουμπί υποβολής , και βεβαιωθείτε ότι ο τίτλος της σελίδας Ιστού ενημερώνεται σωστά. Η εικόνων