Wie Binary Data in ein Decimal in Perl konvertieren . Binary Digits kann einen von zwei Werten : eine 1 oder eine 0 . In der Programmiersprache Perl , können Sie binäre Daten in eine andere Form umwandeln . Zum Beispiel können Sie eine binäre Sequenz in eine Dezimalzahl umzuwandeln. Dezimalzahlen sind viel häufiger in der nicht digitalen Welt als Binärzahlen , so ist es sinnvoll, in der Lage sein in Dezimalzahlen umwandeln . Sie können eine binäre Zahl mit einer Zeile Code mit Perl konvertieren. Anleitung
1
Erstellen Sie eine neue Textdatei mit einem Textverarbeitungsprogramm wie zB Notepad . Speichern Sie die Datei mit der " . Plx "-Erweiterung .
2
Öffnen Sie eine Eingabeaufforderung , und navigieren Sie zu dem Ordner, in dem Sie die Datei in der vorherigen Schritt erstellt . Zum Beispiel, wenn Sie Ihre Datei gespeichert auf der Wurzel Ihrer C:
cd C : \\
3 \\-Laufwerk in Windows , können Sie folgendes in eine Eingabeaufforderung eingeben
Konvertieren Sie die binäre Zahl '10101010 ' in den entsprechenden Dezimalwert und speichern sie in einer Variablen namens $ Nachkommastelle . Der Umwandlungsprozess verwendet die ord und Pack -Funktionen. Die Packung Funktion wandelt eine Liste von Werten in einen String und die ord -Funktion gibt eine numerische Darstellung des Strings. Kombinieren Sie diese beiden Funktionen und weisen Sie die Variable $ Dezimalstellen in eine Zeile Code , wie folgt aus: $
dezimal = ord ( Pack ( ' B8 ' , '10101010 '));
4
drucken Sie die Variable $ Dezimalstellen wie folgt aus:
print $ Nachkommastelle ;
5
Führen Sie das Perl-Skript , indem Sie den folgenden Befehl von der Befehlszeile aus , und ersetzen Sie den Namen Sie wählten in Schritt 1 für " Dateiname" :
perl filename.plx
6
Untersuchen Sie die Ausgabe . Das Programm druckt den Dezimalwert " 10101010 ", die wie folgt aussieht:
170