Perl : Πώς να αντικαταστήσει Ερωτηματικά

Η γλώσσα προγραμματισμού Perl σχεδιάστηκε αρχικά για να δημιουργήσετε εκθέσεις . Περιέχει ισχυρές λειτουργίες για το χειρισμό των αρχείων κειμένου . Για παράδειγμα, μπορείτε να αντικαταστήσετε ένα χαρακτήρα (όπως ένα ερωτηματικό ) ή συμβολοσειρά χαρακτήρων με ένα άλλο. Το "s " λειτουργία χρησιμοποιείται για υποκατάσταση ή αντικατάσταση . Η επεξεργασία κειμένου είναι τοποθετημένο σε ένα δεύτερο αρχείο κειμένου και το αρχικό αρχείο παραμένει αμετάβλητη . Η «ανοικτή» η λειτουργία ανοίγει τα αρχεία . Το " κλείσιμο " της λειτουργίας κλείνει τα αρχεία όταν τελειώσετε τη χρήση τους . Οδηγίες
Η

1 Ανοίξτε ένα κενό αρχείο απλού κειμένου σε οποιοδήποτε πρόγραμμα επεξεργασίας κειμένου 2

Πληκτρολογήστε την ακόλουθη γραμμή για να αρχίσει το σενάριο Perl : .

# ! /usr /bin /perl εικόνων
3

Πληκτρολογήστε τις ακόλουθες γραμμές για να ανοίξετε το αρχείο που περιέχει τα ερωτηματικά ( " orig_file ») και το αρχείο όπου θέλετε να αποθηκεύσετε τις αλλαγές ( " έξοδος " ) :

ανοιχτό ( ΑΡΧΕΙΟ , " orig_file " ) ή να πεθάνουν $ ?

ανοίξει ( outfile , " έξοδος " ) ή να πεθάνουν $ ?

Αντικαταστήστε το " orig_file " ! και " έξοδο " με τα κατάλληλα ονόματα για το script σας .
Η

4 Πληκτρολογήστε τις ακόλουθες γραμμές για τη δημιουργία του βρόχου while που θα διαβάσει τα περιεχόμενα του αρχικού αρχείου , αντικαταστήστε τα με ερωτηματικά παχύ έντερο και να γράψει τις αλλαγές στο αρχείο εξόδου :

ενώ ( )

{

$ _ = ~ s /;/:/g ?

εκτύπωση outfile $ _ ?

}

Αντικαταστήστε το " : " . στο " $ _ = ~ s /;/:/g ? " με ό, τι χαρακτήρα που θέλετε να αντικαταστήσετε το ερωτηματικό με

5

Πληκτρολογήστε τις ακόλουθες γραμμές για να κλείσουν τα ανοικτά αρχεία :

κοντά ( outfile ) ?

κοντά ( ΑΡΧΕΙΟ ) ?
Η 6

Αποθηκεύστε το αρχείο ως " sub_semicolon.pl . "
Η 7

Πληκτρολογήστε την εντολή " perl sub_semicolon.pl " σε μια γραμμή εντολών για να εκτελέσει το σενάριο .

Η