Πώς να μετατρέψετε το δυαδικό δεδομένων σε δεκαδικό σε Perl

Υπολογιστές κατάστημα όλα τα δεδομένα ως ακολουθίες δυαδικών ψηφίων . Δυαδικά ψηφία μπορούν να έχουν μία από τις δύο τιμές : α 1 ή 0 . Στη γλώσσα προγραμματισμού Perl , μπορείτε να μετατρέψετε δυαδικά δεδομένα σε μια άλλη μορφή . Για παράδειγμα , μπορείτε να μετατρέψετε μια δυαδική ακολουθία σε δεκαδικό αριθμό . Δεκαδικοί αριθμοί είναι πολύ πιο συχνή σε μη ψηφιακών κόσμο από δυαδικούς αριθμούς , γι 'αυτό είναι χρήσιμο να είναι σε θέση να μετατρέψει σε δεκαδικό . Μπορείτε να μετατρέψετε ένα δυαδικό αριθμό με μία γραμμή κώδικα που χρησιμοποιούν Perl . Οδηγίες
Η

1 Δημιουργήστε ένα νέο αρχείο κειμένου με τη χρήση ενός επεξεργαστή κειμένου , όπως το Notepad . Αποθηκεύστε το αρχείο με τη χρήση του " . Plx " επέκταση . 2

Ανοίξτε μια γραμμή εντολών και μεταβείτε στο φάκελο όπου έχετε αποθηκεύσει το αρχείο που δημιουργήθηκε στο προηγούμενο βήμα . Για παράδειγμα , αν έχετε αποθηκεύσει το αρχείο σας στη ρίζα του C: \\ drive στα Windows , μπορείτε να πληκτρολογήσετε τα ακόλουθα σε μια γραμμή εντολών :

cd C : \\ εικόνων
3

Μετατρέψτε τον δυαδικό αριθμό '10101010 » στον αντίστοιχο δεκαδικό και να το αποθηκεύσετε σε μια μεταβλητή με όνομα $ δεκαδικό . Η διαδικασία μετατροπής χρησιμοποιεί τα ord και το πακέτο λειτουργιών . Η λειτουργία πακέτο μετατρέπει μια λίστα τιμών σε μια σειρά , και η συνάρτηση ord επιστρέφει μια αριθμητική αναπαράσταση του string . Μπορείτε να συνδυάσετε αυτές τις δύο λειτουργίες και να ορίσετε τη μεταβλητή $ δεκαδικό σε μία γραμμή κώδικα , όπως αυτό :

$ δεκαδικό = ord ( πακέτο ( « B8 » , '10101010 ')) ?
Η 4

Εκτυπώστε τη μεταβλητή $ δεκαδικό σαν αυτό :

print $ δεκαδικό ?
5

Εκτελέστε το σενάριο Perl , εκδίδοντας την ακόλουθη εντολή από τη γραμμή εντολών , αντικαθιστώντας το όνομα που επιλέξατε στο βήμα 1 για " όνομα αρχείου" :

perl filename.plx
Η 6

Εξετάστε το αποτέλεσμα . Το πρόγραμμα τυπώνει τη δεκαδική τιμή του " 10101010 ", το οποίο μοιάζει με αυτό :

170
Η
εικόνων