Προγραμματισμός

* Γνώση Υπολογιστών >> Προγραμματισμός >> Perl Προγραμματισμός

Πώς να μετατρέψετε ένα String με INT PERL

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

1 Κάντε δεξί κλικ στο αρχείο PERL σας και επιλέξτε " Άνοιγμα με . " Κάντε κλικ στο πρόγραμμα επεξεργασίας PERL , στη συνέχεια, κάντε κλικ στο κουμπί "Άνοιγμα ". Αν δεν έχετε ένα εξειδικευμένο πρόγραμμα επεξεργασίας PERL , κάντε κλικ στο " Σημειωματάριο " και στη συνέχεια κάντε κλικ στο κουμπί "Άνοιγμα ". Μπορείτε να αλλάξετε τον κωδικό PERL με το εσωτερικό πρόγραμμα Windows Notepad . 2

Δημιουργήστε λειτουργία PERL σας για να αναλύσει το string και να μετατρέψει το string με το " int " τύπο δεδομένων . Πληκτρολογήστε τον ακόλουθο κώδικα οπουδήποτε στο αρχείο σας PERL κώδικα :

υπο convert_to_in {

$ μου string?

Foreach $ μου εγχόρδων (διαίρεση ( //, βάρδια ( ) ) ) {

$ string = $ string * 10 + $ d ?

}

επιστροφή $ string?

}

Αυτό λειτουργία μετατρέπει κάθε string σε τύπο δεδομένων ακέραιο . Μπορείτε να στείλετε οποιαδήποτε συμβολοσειρά με τη λειτουργία για να το μετατρέψει σε μια σειρά .
Εικόνων 3

Καλέστε το νέο λειτουργία στον κώδικά σας . Μετακινηθείτε προς τα κάτω για το τμήμα του κωδικού σας, όπου θα πρέπει να μετατρέψει το string . Πληκτρολογήστε τον ακόλουθο κώδικα για να μετατρέψετε σειρά σας :

$ μετατρέπονται = convert_to_int ( " 123 " ) ?

Ο παραπάνω κώδικας μετατρέπει το string " 123 " για την αριθμητική τιμή και την αποθηκεύει στο " $ μετατραπεί " μεταβλητή . Αντικαταστήστε το " 123 " με το δικό σας σειρά να μετατρέψετε.
Η

4 Πατήστε το πλήκτρο " Ctrl " και " S" για να αποθηκεύσετε τις αλλαγές σας . Χρησιμοποιήστε το πρόγραμμα επεξεργασίας PERL σας για να τρέξει το αρχείο και να ελέγξετε τις αλλαγές σας , ή να ανοίξετε το αρχείο στο πρόγραμμα περιήγησης στο Web για να δοκιμάσετε τον κώδικα .
Η
εικόνων

Συναφής σύστασή

Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα