Linux-Befehl oder Bash-Syntax, die das nächste ASCII-Zeichen berechnen

Question

Ich habe eine Linux-Maschine (Red Hat Linux 5.1), und ich muss die folgende Aufgabe zu meinem Bash-Skript hinzufügen.

Welcher Linux-Befehl oder Bash-Syntax berechnet das nächste ASCII-Zeichen?

Bemerkung - die Befehlssyntax kann auch AWK/Perl sein, aber diese Syntax muss in meinem Bash-Skript sein.

Beispiel:

input     results 

a --> the next is b 
c --> the next is d 
A --> the next is B 

Answer 1

Perl ++ operator auch Zeichenfolgen verarbeitet, in einem Maße:

perl -nle 'print ++$_' 

Die Option -l mit Autochomp ist hier notwendig, da zum Beispiel sonst 1 zurückgibt.

Answer 2

Sie chr() und ord() Funktionen für Bash nutzen könnten (siehe How do I convert an ASCII character to its decimal (or hexadecimal) value and back?):

# POSIX 
# chr() - converts decimal value to its ASCII character representation 
# ord() - converts ASCII character to its decimal value 

Answer 3

perl -le "print chr(ord(<>) + 1)" 

Interactive:

breqwas@buttonbox:~$ perl -le "print chr(ord(<>) + 1)" 
M 
N 

Nicht interaktiv:

breqwas@buttonbox:~$ echo a | perl -le "print chr(ord(<>) + 1)" 
b 

Answer 4

Verwendung übersetzen (tr):

echo "aA mM yY" | tr "a-yA-Y" "b-zB-Z" 

Er druckt:

bB nN zZ

Answer 5

Der Zeichenwert:

c="a" 

Um das Zeichen seines ASCII-Wert zu konvertieren:

v=$(printf %d "'$c") 

Der Wert, den Sie zu diesem ASCII-Wert hinzufügen mögen:

add=1 

zu Ändern Sie den ASCII-Wert, indem Sie $ add hinzufügen:

((v+=add)) 

Um das Ergebnis zu konvertieren char:

perl -X -e "printf('The character is %c\n', $v);" 

I -X verwendet, um alle Warnungen

---

Sie können alle diese in einer Zeile und das Ergebnis in der vairable kombinieren deaktivieren $ r:

c="a"; add=1; r=$(perl -X -e "printf('%c', $(($add+$(printf %d "'$c"))));") 

können Sie das Ergebnis drucken:

echo "$r" 

---

Sie eine Funktion machen kann das Ergebnis zurück:

x=$(achar "a" 1) // x = the character that follows a by 1 

oder:

achar() 
{ 
    c="$1"; add=$2 
    printf "$(perl -X -e "printf('%c', $(($add+$(printf %d "'$c"))));")" 
} 

Sie die Funktion nutzen können Sie können eine Schleife machen:

array=(a k m o) 
for l in "${array[@]}" 
do 
    echo "$l" is followed by $(achar "$l" 1) 
done