मैं एक स्ट्रिंग वैरिएबल की व्याख्या कैसे कर सकता हूं जो पता

Question

का प्रतिनिधित्व करता है, मैं इस ./cprogram $(perl -e 'print "\xab\xcd\xef";') जैसे एक पर्ल स्क्रिप्ट के साथ एक सी प्रोग्राम में इनपुट फ़ीड करना चाहता हूं।

हालांकि, स्ट्रिंग को फ़ाइल से पढ़ा जाना चाहिए। तो मुझे ऐसा कुछ मिलता है: ./cprogram $(perl -e 'open FILE, "<myfile.txt"; $file_contents = do { local $/; <FILE> }; print $file_contents'। हालांकि, अब स्ट्रिंग स्ट्रिंग को "\xab\xcd\xef" स्ट्रिंग के रूप में व्याख्या करता है, और मैं इसे पहले उदाहरण के रूप में बाइट अनुक्रम के रूप में समझना चाहता हूं।

यह कैसे प्राप्त किया जा सकता है? फ़ाइल :: Slurp के बिना इसे सर्वर पर चलाना होगा।

Answer 1

पहले मामले में, आप तीन बाइट AB CD EF (स्ट्रिंग शाब्दिक "\xAB\xCD\xEF" द्वारा उत्पादित) print पर पास करते हैं।

दूसरे मामले में, आपको उन तीन बाइट्स के अलावा print पर कुछ और गुजरना होगा। मुझे संदेह है कि आप बारह वर्ण स्ट्रिंग \xAB\xCD\xEF से print पास कर रहे हैं।

तो आपका प्रश्न बन जाता है: कैसे बारह-वर्ण स्ट्रिंग \xAB\xCD\xEF को तीन बाइट्स AB CD EF में परिवर्तित करता है। ठीक है, आप के रूप में

s/\\x([0-9a-fA-F][0-9a-fA-F])|\\([^x])|([^\\]+)/ 
    $1 ? chr(hex($1)) : $2 ? $2 : $3 
/eg 

पार्सर इस तरह के किसी तरह का आवश्यकता होगी और यहाँ यह काम पर है:

perl -e "$(echo "print \"$(cat input)"\")" 

जिसके लिए अपने उदाहरण हो जाता है: एक बैश चाल का उपयोग कर

$ perl -e'print "\\xAB\\xCD\\xEF";' >file 

$ echo -n "$(perl -0777pe' 
    s{\\x([0-9a-fA-F][0-9a-fA-F])|\\([^x])|([^\\]+)}{ 
     $1 ? chr(hex($1)) : $2 // $3 
    }eg; 
    ' file)" | od -t x1 
0000000 ab cd ef 
0000003 

Answer 2

:

./cprogram "$(perl -e "$(echo "print \"$(cat myfile.txt)"\")")" 

Answer 3

क्या पर्ल का विकास भी ई है विल? यदि नहीं, print eval("\"$file_contents\"");

में समाप्त हो या आप पर्ल का उपयोग कर अग्रिम रूप से फ़ाइल तैयार कर सकते हैं? ईजी print FILE "\xAB\xCD\xED"; फिर परिणामस्वरूप फ़ाइल को अपने मौजूदा कोड के साथ पढ़ें।