ο Perl push () χρησιμοποιείται για να ωθήσει μια τιμή ή τιμές στο τέλος μιας συστοιχίας, γεγονός που αυξάνει τον αριθμό των στοιχείων. Στη συνέχεια, οι νέες τιμές γίνονται τα τελευταία στοιχεία του πίνακα. Επιστρέφει το νέο συνολικό αριθμό στοιχείων στη συστοιχία. Είναι εύκολο να συγχέουμε αυτή τη λειτουργία με τη λειτουργία unshift (), η οποία προσθέτει στοιχεία στην αρχή ενός πίνακα. Ακολουθεί ένα παράδειγμα της λειτουργίας Perl push ():
@myNames = ('Larry', 'Curly').
πιέστε @myNames, 'Moe';
εκτύπωση "@myNames \ n";
Όταν εκτελείται αυτός ο κώδικας, παρέχει:
Λάρι Σγουρό μου
Δημιουργήστε μια σειρά αριθμημένων πλαισίων, πηγαίνοντας από αριστερά προς τα δεξιά. Η λειτουργία push () ωθεί τη νέα τιμή ή τις τιμές στη δεξιά πλευρά του πίνακα και αυξάνει τα στοιχεία.
Η συστοιχία μπορεί επίσης να θεωρηθεί ως στοίβα. Φανταστείτε μια στοίβα αριθμημένων πλαισίων, ξεκινώντας από το 0 στην κορυφή και αυξάνοντας καθώς κατεβαίνει. Η λειτουργία push () ωθεί την τιμή στο κάτω μέρος της στοίβας και αυξάνει τα στοιχεία, όπως αυτό:
@myNames = (,
'Κατσαρός'
);
πιέστε @myNames, 'Moe';
Μπορείτε επίσης να ωθήσετε πολλαπλές τιμές στον πίνακα απευθείας ...
@myNames = ('Larry', 'Curly').
push @myNames, ('Moe', 'Shemp');
... ή πιέζοντας μια συστοιχία:
@myNames = ('Larry', 'Curly').
@moreNames = ('Moe', 'Shemp');
ώθηση (@myNames, @moreNames);
Σημείωση για αρχάριους προγραμματιστές: Οι συστοιχίες Perl αρχίζουν με ένα σύμβολο @. Κάθε πλήρης σειρά κώδικα πρέπει να τελειώνει με ένα ερωτηματικό. Εάν δεν το κάνει, δεν θα εκτελεστεί. Στο στοιβάζονται παράδειγμα σε αυτό το άρθρο, οι γραμμές χωρίς ένα ερωτηματικό είναι τιμές που περιέχονται σε μια διάταξη και περικλείονται σε παρενθέσεις. Αυτό δεν αποτελεί εξαίρεση στον κανόνα του ερωτηματικού, τόσο ως αποτέλεσμα της προσέγγισης στοίβα. Οι τιμές στη συστοιχία δεν είναι ξεχωριστές γραμμές κώδικα. Είναι ευκολότερο να το απεικονίσετε αυτό στην οριζόντια προσέγγιση της κωδικοποίησης.
Άλλες λειτουργίες για χειρισμούς συστοιχιών
Άλλες λειτουργίες χρησιμοποιούνται επίσης για τον χειρισμό των συστοιχιών. Αυτά καθιστούν εύκολη και αποδοτική τη χρήση μιας συστοιχίας Perl ως στοίβα ή ως ουρά. Εκτός από τη λειτουργία push, μπορείτε να χρησιμοποιήσετε:
- Λειτουργία Pop - αφαιρεί και επιστρέφει το τελευταίο στοιχείο ενός πίνακα
- Λειτουργία Shift - μετακινεί ολόκληρο τον πίνακα προς τα αριστερά. Το στοιχείο που είναι το πρώτο στοιχείο της συστοιχίας πέφτει από τη συστοιχία και γίνεται η επιστρεφόμενη τιμή της συνάρτησης
- Απενεργοποίηση λειτουργίας - το αντίθετο της συνάρτησης μετατόπισης, τοποθετεί μια τιμή στην αρχή ενός πίνακα και μετακινεί όλο το άλλο στοιχείο προς τα δεξιά.