Δύο τύποι μεταβλητών μπορούν να χρησιμοποιηθούν σε γλώσσες δέσμης ενεργειών φλοιού: η μία είναι οι μεταβλητές φλοιού και η άλλη οι μεταβλητές περιβάλλοντος. Οι μεταβλητές περιβάλλοντος λειτουργούν ως καθολικές μεταβλητές για τις γλώσσες δέσμης ενεργειών. Τα δεδομένα που σχετίζονται με το περιβάλλον που χρησιμοποιούνται για την εκτέλεση της δέσμης ενεργειών αποθηκεύονται στις μεταβλητές περιβάλλοντος. Αυτές οι μεταβλητές αποθηκεύονται με βάση το ζεύγος κλειδιού-τιμής. Το όνομα της μεταβλητής ορίζεται από το κλειδί που αποθηκεύει την τιμή της μεταβλητής. Η τιμή οποιασδήποτε μεταβλητής περιβάλλοντος μπορεί να οριστεί ή να προσπελαστεί από το σενάριο Perl. Οι μέθοδοι πρόσβασης και τροποποίησης των μεταβλητών περιβάλλοντος χρησιμοποιώντας τη δέσμη ενεργειών Perl παρουσιάζονται σε αυτό το σεμινάριο.
Χρήσεις των μεταβλητών περιβάλλοντος στο Perl Script
Οι μέθοδοι πρόσβασης στη συγκεκριμένη ή σε όλες τις μεταβλητές περιβάλλοντος και την επαναφορά οποιασδήποτε μεταβλητής περιβάλλοντος εμφανίζονται σε αυτό το μέρος του σεμιναρίου.
Παράδειγμα 1: Εκτυπώστε τις συγκεκριμένες μεταβλητές περιβάλλοντος
Οι μεταβλητές περιβάλλοντος αποθηκεύονται στον πίνακα %ENV που λειτουργεί όπως ο συσχετιστικός πίνακας. Το όνομα της μεταβλητής είναι το κλειδί του πίνακα %ENV και η τιμή αποθηκεύεται στο συγκεκριμένο κλειδί. Δημιουργήστε ένα αρχείο Perl με την ακόλουθη δέσμη ενεργειών που εκτυπώνει τρεις μεταβλητές περιβάλλοντος. Το τρέχον όνομα χρήστη σύνδεσης αποθηκεύεται στη μεταβλητή $ENV{'USER'}. Η τρέχουσα τιμή φλοιού αποθηκεύεται στη μεταβλητή $ENV{'SHELL'}. Ο τρέχων κατάλογος εργασίας αποθηκεύεται στη μεταβλητή $ENV{‘PWD’}. Αυτές οι τρεις μεταβλητές έχουν πρόσβαση και εκτυπώνονται στο σενάριο.
#!/local/bin/perl
χρήση αυστηρή?
χρήση προειδοποιήσεων·
χρήση 5.34.0;
#Εκτυπώστε τις τιμές τριών μεταβλητών περιβάλλοντος
λένε 'Όνομα χρήστη είναι' . $ENV { 'ΧΡΗΣΤΗΣ' } ;
λένε 'Το τρέχον κέλυφος είναι' . $ENV { 'ΚΕΛΥΦΟΣ' } ;
λένε 'Ο τρέχων κατάλογος εργασίας είναι ' . $ENV { 'ΑΜΕΑ' } ;
Παραγωγή:
Η ακόλουθη παρόμοια έξοδος εμφανίζεται μετά την εκτέλεση του σεναρίου:
Παράδειγμα 2: Εκτύπωση των πρώτων πέντε μεταβλητών περιβάλλοντος
Δημιουργήστε ένα αρχείο Perl με την ακόλουθη δέσμη ενεργειών για να διαβάσετε τις πέντε πρώτες τιμές του πίνακα %ENV που περιέχει όλες τις μεταβλητές περιβάλλοντος. Εδώ, ο βρόχος 'foreach' χρησιμοποιείται για την ανάγνωση όλων των μεταβλητών περιβάλλοντος με βάση τις ταξινομημένες τιμές κλειδιού. Η μεταβλητή '$counter' χρησιμοποιείται στο σενάριο για τον τερματισμό του βρόχου μετά την εκτύπωση των πέντε μεταβλητών περιβάλλοντος. Η μεταβλητή '$counter' αυξάνεται σε κάθε επανάληψη του βρόχου και όταν η τιμή του '$counter' είναι 5, η πρόταση 'last' εκτελείται για έξοδο από τον βρόχο.
#!/local/bin/perlχρήση αυστηρή?
χρήση προειδοποιήσεων·
χρήση 5.34.0;
#Αρχικοποιήστε τον μετρητή
μου $μετρητής = 0 ;
#Επαναλάβετε τον βρόχο για να διαβάσετε όλες τις μεταβλητές περιβάλλοντος
για κάθε ( είδος κλειδιά % ENV ) {
#Διαβάστε το όνομα της μεταβλητής περιβάλλοντος
μου $κλειδί = $_ ;
#Διαβάστε την τιμή της μεταβλητής περιβάλλοντος
μου $value = $ENV { $κλειδί } ;
#Εκτυπώστε το όνομα της μεταβλητής με την τιμή
λένε ' $κλειδί => $value ' ;
#Αύξηση του μετρητή
$μετρητής ++;
#Ελέγξτε την τιμή του μετρητή
αν ( $μετρητής > = 5 )
{
#Τερματισμός από τον βρόχο
τελευταίος ;
}
}
Παραγωγή:
Η ακόλουθη παρόμοια έξοδος εμφανίζεται μετά την εκτέλεση του σεναρίου:
Παράδειγμα 3: Επαναφέρετε τη μεταβλητή περιβάλλοντος
Στα προηγούμενα παραδείγματα, η πρόσβαση στις προκαθορισμένες τιμές των μεταβλητών περιβάλλοντος γίνεται μεμονωμένα και με χρήση βρόχου. Ωστόσο, η τιμή οποιασδήποτε μεταβλητής περιβάλλοντος μπορεί να αλλάξει χρησιμοποιώντας τη δέσμη ενεργειών Perl. Δημιουργήστε ένα αρχείο Perl με την ακόλουθη δέσμη ενεργειών που εκτυπώνει τη θέση του HOME, αλλάζει τη θέση σε '/temp/files' και εκτυπώνει τη θέση του HOME ξανά μετά την ενημέρωση.
#!/local/bin/perlχρήση αυστηρή?
χρήση προειδοποιήσεων·
χρήση 5.34.0;
#Εκτυπώστε την τιμή της συγκεκριμένης μεταβλητής περιβάλλοντος
λένε 'Η τρέχουσα αξία του HOME είναι' . $ENV { 'ΣΠΙΤΙ' } ;
#Επαναφορά της μεταβλητής περιβάλλοντος
$ENV { 'ΣΠΙΤΙ' } = '/temp/files' ;
#Εκτυπώστε την τιμή της συγκεκριμένης μεταβλητής περιβάλλοντος μετά την ενημέρωση
λένε 'Η τρέχουσα αξία του HOME είναι' . $ENV { 'ΣΠΙΤΙ' } ;
Παραγωγή:
Η ακόλουθη παρόμοια έξοδος εμφανίζεται μετά την εκτέλεση του σεναρίου:
Παράδειγμα 4: Εκτυπώστε τις μεταβλητές περιβάλλοντος με μορφοποίηση
Δημιουργήστε ένα αρχείο Perl με την ακόλουθη δέσμη ενεργειών που εκτυπώνει τις μεταβλητές περιβάλλοντος με μορφοποίηση χρησιμοποιώντας τη συνάρτηση printf(). Εδώ, ο βρόχος 'foreach' χρησιμοποιείται για την ανάγνωση όλων των μεταβλητών περιβάλλοντος όπως στο προηγούμενο παράδειγμα. Το ζεύγος κλειδιού-τιμής της μεταβλητής περιβάλλοντος εκτυπώνεται προσθέτοντας την άνω και κάτω τελεία(:) μεταξύ του κλειδιού και της τιμής και διατηρώντας ένα διάστημα 15 χαρακτήρων για το κλειδί.
#!/local/bin/perlχρήση αυστηρή?
χρήση προειδοποιήσεων·
χρήση 5.34.0;
#Επαναλάβετε τον βρόχο για να διαβάσετε όλες τις μεταβλητές περιβάλλοντος
προσπάθησε μου $k ( είδος κλειδιά % ENV ) {
#Εκτυπώστε τη μορφοποιημένη έξοδο των μεταβλητών περιβάλλοντος
printf ( '%15s : %s \n ' , $k , $ENV { $k } ) ;
}
Παραγωγή:
Η παρακάτω παρόμοια έξοδος εμφανίζεται μετά την εκτέλεση του σεναρίου. Ορισμένα τμήματα στην αρχή της εξόδου εμφανίζονται εδώ:
συμπέρασμα
Οι μεταβλητές περιβάλλοντος χρησιμοποιούνται για διαφορετικούς σκοπούς και μερικές φορές απαιτείται η αλλαγή της τρέχουσας τιμής της συγκεκριμένης μεταβλητής περιβάλλοντος για οποιοδήποτε σκοπό προγραμματισμού. Οι μέθοδοι λήψης και ρύθμισης των τιμών των μεταβλητών περιβάλλοντος χρησιμοποιώντας τη δέσμη ενεργειών Perl παρουσιάζονται στα παραδείγματα αυτού του σεμιναρίου για να βοηθήσουν τους χρήστες της Perl.