चरित्र मूल्य:
c="a"
अपने ASCII मूल्य के चरित्र बदलने के लिए:
v=$(printf %d "'$c")
मूल्य आप इस ASCII मूल्य में जोड़ना चाहते हैं:
add=1
करने के लिए इसमें $ add जोड़कर अपने ASCII मान को बदलें:
((v+=add))
चार करने के लिए परिणाम बदलने के लिए:
perl -X -e "printf('The character is %c\n', $v);"
मैं -X
इस्तेमाल किया सभी चेतावनियों
आप एक पंक्ति में इन सब को जोड़ सकते हैं अक्षम करें और vairable में परिणाम डाल करने के लिए $ आर:
c="a"; add=1; r=$(perl -X -e "printf('%c', $(($add+$(printf %d "'$c"))));")
x=$(achar "a" 1) // x = the character that follows a by 1
या:
achar()
{
c="$1"; add=$2
printf "$(perl -X -e "printf('%c', $(($add+$(printf %d "'$c"))));")"
}
आप फ़ंक्शन का उपयोग कर सकते हैं: परिणाम वापस जाने के लिए
echo "$r"
आप एक समारोह बना सकते हैं:आप परिणाम मुद्रित कर सकते हैं आप एक लूप बना सकते हैं:
array=(a k m o)
for l in "${array[@]}"
do
echo "$l" is followed by $(achar "$l" 1)
done
यदि आपका इनपुट z/Z है तो आप क्या करना चाहते हैं? – Levon
यह तार्किक मामला नहीं है (मुझे ज़ेड या जेड तक की आवश्यकता है !!!) –