1 Ανοίξτε ένα αρχείο προγράμματος Perl . Τοποθετήστε το δρομέα στο σημείο όπου θέλετε να αφαιρέσετε τα κενά από μια μεταβλητή 2
Πληκτρολογήστε τον ακόλουθο κώδικα : .
$ Μου String = "string μου με έναν κορυφαίο χώρο " ?
print $ string . " \\ n" ?
$ string = ~ s /^ \\ s + //?
print $ string . " \\ n" ?
Η μεταβλητή σε αυτό το παράδειγμα έχει μία ηγετική χώρο πριν από το κείμενο , αλλά το μοντέλο που ταιριάζουν λειτουργία στην τρίτη γραμμή θα αφαιρέσει όλα τα κενά διαστήματα , συμπεριλαμβανομένων διέφυγε χαρακτήρα, όπως "\\ t" για ένα καρτέλα . Η ίδια η λειτουργία ξεκινά με το " s /" και καλεί τον φορέα υποκατάστασης . Ο " ^ " λέει να ταιριάζει από την αρχή του string . Το "\\ s " λέει να ελέγξει για whitespaces και το " + " λέει να αφήσει το υπόλοιπο του string ανέπαφη .
Εικόνων 3
Αποθηκεύστε το αρχείο προγράμματος Perl .
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα