Η γλώσσα προγραμματισμού 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> " και κοντά " < /title> " ετικέτες HTML : <br> <p> print " <title> $ value < /title> " ? <br> Η 6 <p> Χρησιμοποιήστε την Perl "print " εντολή για να εκτυπώσετε ένα " <form> " ετικέτα στην ιστοσελίδα . Δώστε τη φόρμα του τύπου μέθοδο "πάρει" και την τιμή της ενέργειας " perlTitle.html " . Εκτυπώστε ένα κλείσιμο » < /form> " ετικέτα για να συμπληρώσετε τη φόρμα που ο χρήστης θα υποβάλει : <br> <p> print " <form method='get' action='perlTitle.pl'> " ? print " < /form> " ? <br> Η 7 <p> Χρησιμοποιήστε το "print " εντολή Perl για να εκτυπώσετε ένα έγγραφο HTML " <input> " πεδίο στην ιστοσελίδα . Δώστε το πεδίο εισαγωγής του " τύπου " αξία " κείμενο" , το "όνομα " αξία " τίτλος " και κλείστε το " < /input > " ετικέτα . Χρησιμοποιήστε το Perl "print " εντολή για να εκτυπώσετε ένα δεύτερο HTML " <input> " στην ιστοσελίδα με ένα " είδος " αξία " αποστολή" . Τοποθετήστε τα δύο " print" εντολές μεταξύ του " <form> " και " < /form> " ετικέτες και να αποθηκεύσετε και κοντά perlTitle.pl . Μετά το βήμα 7 , perlTitle.pl θα εμφανιστεί όπως φαίνεται παρακάτω : <br> <p> # /usr /local /bin /perlprint " Content-type : text /html \\ n \\ n" ? ! Εκτύπωσης " <html> ? " ? $ keyValue = ( $ ENV { ' QUERY_STRING '} ) ? ( $ name , $ value ) = διάσπαση ( /= /, $ keyValue ) ? print " <title> $ value < /title> " ? print " <form method='get' action='perlTitle.pl'> " ? print " <input type='text' name='title'> < /input > " ? print " <input type='submit'> " ? print " < /form> " ? print " < /html > " ? <br> 8 <p> Open perlTitle . pl σε ένα πρόγραμμα περιήγησης στο web . Πληκτρολογήστε μια τιμή στο πεδίο εισαγωγής , κάντε κλικ στο κουμπί υποβολής , και βεβαιωθείτε ότι ο τίτλος της σελίδας Ιστού ενημερώνεται σωστά. <br> Η <br> εικόνων
<div class="grad2"> <script async src="https://pagead2.googlesyndication.com/pagead/js/adsbygoogle.js?client=ca-pub-3314932315682382" crossorigin="anonymous"></script> <!-- 221021-2 --> <ins class="adsbygoogle" style="display:block" data-ad-client="ca-pub-3314932315682382" data-ad-slot="8094203668" data-ad-format="auto" data-full-width-responsive="true"></ins> <script> (adsbygoogle = window.adsbygoogle || []).push({}); </script></div>
<div class="grad3"></div>
</div>
<div class="fanyedads">
<ul>
<li>Τελευταίο άρθρο: <a class='LinkPrevArticle' href='http://www.221021.com/Programming/perl-programming/93218.html' >Πώς να βρείτε κινεζικούς χαρακτήρες χρησιμοποιώντας κανονικές εκφράσεις σε Perl </a>
<li>Επόμενο άρθρο: <a class='LinkNextArticle' href='http://www.221021.com/Programming/perl-programming/93220.html' >Πώς να εξαναγκάσει καμία αρχείο σε ένα UTF - 8 σε Perl </a>
</ul>
</div>
</div>
<div class="woqinimaderwr24">
<div class="dibud23">
<div class="biaotidas51">
<div class="biaotidas511"><h3>Συναφής σύστασή</h3></div>
<div class="butudasda"></div>
</div>
</div>
<div class="dibud24">
<div class="dibud241">
<ul class="dsa31das">
<li><a href="http://www.221021.com/Programming/perl-programming/93279.html" target="_blank">Πώς να τρέξει ένα Perl Script μακρινά στα Windows </a></li>
<li><a href="http://www.221021.com/Programming/perl-programming/93337.html" target="_blank">Πώς να κάνει μια Directory σε Perl Με Σενάριο </a></li>
<li><a href="http://www.221021.com/Programming/perl-programming/93286.html" target="_blank">Πώς να απομνημονεύσει ένα αρχείο σε Perl </a></li>
<li><a href="http://www.221021.com/Programming/perl-programming/93315.html" target="_blank">Πώς να χρησιμοποιήσετε μια λειτουργία Perl Grep </a></li>
<li><a href="http://www.221021.com/Programming/perl-programming/93254.html" target="_blank">Πως να ρυθμίσετε Perl σε XAMPP </a></li>
</ul>
</div>
<div class="dibud242">
<div class="biaotidasoidasf3h4">
<h4>Τελευταία άρθρα</h4>
<div class="nibushihenzaiyi"></div>
</div>
<ul class="thydghaodennrend">
<li><a href="http://www.221021.com/Programming/perl-programming/93425.html" target="_blank">Πώς να χρησιμοποιήσετε τη δήλωση foreach στην Perl </a></li>
<li><a href="http://www.221021.com/Programming/perl-programming/93207.html" target="_blank">Πώς να χρησιμοποιήσετε τις συνήθεις εκφράσεις για να δείτε ένα String που είναι Αριθμητικό </a></li>
<li><a href="http://www.221021.com/Programming/perl-programming/93339.html" target="_blank">Πώς να μετατρέψετε ένα πίνακα σε μια σειρά σε Perl </a></li>
<li><a href="http://www.221021.com/Programming/perl-programming/93192.html" target="_blank">Πώς να βρείτε τη λειτουργία σε μια σειρά από αριθμούς σε Perl </a></li>
</ul>
</div>
</div>
</div>
<div class="dibudaohnagdsaw">
<div class="das342sd"><p>Πνευματικά δικαιώματα © <a href="http://www.221021.com/" target="_blank" >Γνώση Υπολογιστών</a> Όλα τα δικαιώματα κατοχυρωμένα </p></div>
</div>
</div>
</body>
</html>