Πώς να καθαρίσει το Start & End του String σε Perl

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

1 Ανοίξτε ένα κενό έγγραφο απλού κειμένου 2

Πληκτρολογήστε τις ακόλουθες γραμμές για να ξεκινήσει το σενάριο Perl : . !

# Bin /perluse αυστηρή ? χρησιμοποιήσετε προειδοποιήσεις ?
εικόνων 3

Πληκτρολογήστε τις ακόλουθες γραμμές για να δημιουργήσετε ένα string που περιέχει κενά στην αρχή και το τέλος του string , και να εκτυπώσετε το string στην οθόνη :

$ μου orig_string = " Αυτό είναι ένα string ... " ? . print $ orig_string " \\ n " ?
Η

4 Πληκτρολογήστε τις ακόλουθες γραμμές για να αφαιρέσετε το κενό διάστημα από την αρχή του string και να εκτυπώσετε την επεξεργασία κορδόνι στην οθόνη :

$ orig_string = ~ s /^ \\ s + //? print $ orig_string ?
5

Πληκτρολογήστε τις ακόλουθες γραμμές για να αφαιρέσετε το κενό από το τέλος του string και να εκτυπώσετε την επεξεργασία κορδόνι στην οθόνη : . .

$ orig_string = ~ s /\\ s + $ //? print $ orig_string " \\ n" ?
Η 6

Αποθηκεύστε και κλείστε το αρχείο


εικόνων