perl - script is reading only last line of an input file -

-

मेरे इनपुट फ़ाइल में मान (list_muni_nav.txt)। प्रत्येक पंक्ति एक फ़ाइल, यहाँ 'परीक्षण' और 'test2' फ़ाइल नाम हैं के लिए एक रास्ता है। 

  / iwmnt / डिफ़ॉल्ट / मुख्य / सामग्री / Munic / workarea / कार्य / templatedata / muni_site / मेरा पर्ल स्क्रिप्ट (नीचे) प्रत्येक को पढ़ना चाहिए I / O इनपुट फ़ाइल में पंक्ति और उन्हें निष्पादित करें। लेकिन, पिछली पंक्ति को छोड़कर लाइनों के बाकी स्क्रिप्ट को स्क्रिप्ट द्वारा नहीं रखा जा रहा है। कृपया परिणाम देखें  
  मेरी $ content_list = '/home/p12/scripts/list_muni_nav.txt'; प्रिंट "\ t ***************** स्टार्ट ********************************************************************** n "; प्रिंट करें \ \ $ फाइल को $ content_list खोलना \ n "; यदि (फ़ाइल खोलें, "$ content_list") {मेरी $ पंक्ति = & lt; FILE & gt ;; chomp ($ लाइन); जबकि ($ पंक्ति नी "") {प्रिंट "\ t ईएएस को $ पंक्ति फ़ाइल करने के लिए आवेदन करना \ n"; मेरी $ setEAVersion = "$ getAttrib-s टीमसाइट / एसोसिएशन / संस्करण = 1 \" $ line \ ""; `$ SetEAVersion`; मेरी $ setEADCRType = "$ getAttrib-s टीमसाइट / Templating / DCR / प्रकार = muni_site / nav \" $ line \ ""; `$ SetEADCRType`; मेरी $ setEAFormValid = "$ getAttrib- के iw_form_valid = सच \" $ पंक्ति \ ""; `$ SetEAFormValid`; प्रिंट "\ t ईएएस $ लाइन पर सफलतापूर्वक लागू \ n"; प्रिंट "\ t ************************************************************************************************ ************ \ n "; $ पंक्ति = & lt; FILE & gt ;; chomp ($ लाइन); }   
 RESULT:  <प्री>  *************** ******************* उद्घाटन दायर करने के लिए / iwmnt / डिफ़ॉल्ट / ईएएस लागू करने /home/pbiswa01/scripts/list_muni_security.txt फ़ाइल मुख्य / सामग्री / Munic / workarea / कार्य / templatedata / muni_site / सुरक्षा / डेटा / परीक्षण त्रुटि: 02,005: त्रुटि ढूंढने / iwmnt / डिफ़ॉल्ट / मुख्य / सामग्री / Munic / workarea / कार्य / templatedata / muni_site / सुरक्षा / डेटा / परीक्षण त्रुटि: 02,005: त्रुटि ढूंढने / iwmnt / डिफ़ॉल्ट / मुख्य / सामग्री / Munic / workarea / कार्य / templatedata / muni_site / सुरक्षा / डेटा / परीक्षण त्रुटि: 02,005: त्रुटि ढूंढने / iwmnt / डिफ़ॉल्ट / मुख्य / सामग्री / Munic / workarea / कार्य / templatedata / muni_site / सुरक्षा / डेटा / परीक्षण ईएएस / iwmnt / default / main / content / munic / WORKAREA / work / templatedata / muni_site / security / data / test को सफलतापूर्वक लागू करें ************************************************************************** **************************************************************************************************************** I कार्यकर्ता / कार्य / templatedata / muni_site / security / data / test2 ईएएस को सफलतापूर्वक / iwmnt / default / main / content / munic / WORKAREA / work / templatedata / muni_ पर लागू किया गया है साइट / सुरक्षा / डेटा / परीक्षा 2 ********************************************************************************************* *************************** कृपया मदद करो। धन्यवाद! !!   
 
 
 मुझे लगता है कि @ स्टार्क सही है, आपकी समस्या नए अक्षरों के साथ है विशेष चर  $ /  से संबंधित किसी पिछली स्ट्रिंग को निकाल देगा, जो कि विंडोज और लिनक्स पर अलग है इसके बजाय आप एक रैगेक्स का उपयोग कर इस समस्या को प्राप्त कर सकते हैं:  
  मेरी $ content_list = '/home/p12/scripts/list_muni_nav.txt'; प्रिंट "\ t ***************** स्टार्ट ********************************************************************** n "; प्रिंट करें \ \ $ फाइल को $ content_list खोलना \ n "; अगर ($ $ my $ line = & lt; $ fh & gt;) {$ line = ~ s / \ s + $ //;} ($ $ खोलें, "& lt;", "$ content_list") प्रिंट करें \ t $ पंक्ति फ़ाइल करने के लिए ईएएस लागू करना \ n "; मेरी $ setEAVersion = "$ getAttrib-s टीमसाइट / एसोसिएशन / संस्करण = 1 \" $ line \ ""; `$ SetEAVersion`; मेरी $ setEADCRType = "$ getAttrib-s टीमसाइट / Templating / DCR / प्रकार = muni_site / nav \" $ line \ ""; `$ SetEADCRType`; मेरी $ setEAFormValid = "$ getAttrib- के iw_form_valid = सच \" $ पंक्ति \ ""; `$ SetEAFormValid`; प्रिंट "\ t ईएएस $ लाइन पर सफलतापूर्वक लागू \ n"; प्रिंट "\ t ************************************************************************************************ ************ \ n "; }   
  s / \ s + $ //  regex पंक्ति के अंत से सभी रिक्त स्थान को निकाल देता है।  
 एक बोनस के रूप में, मैंने आपका  खुला  बदल दिया है, ताकि यह तीन तर्क संस्करण का उपयोग कर सके और मैंने कोड पुनरावृत्ति से बचने के लिए अपना  जबकि  पाश को बदल दिया।

Comments

Post a Comment

Popular posts from this blog

asp.net - Procedure or function "Procedure name" expects a parameter "Param name" which was not supplied occurs rarely -

-
I have a VB Net has a web service function that will send criteria to an SQL server stored function. Everything works perfectly for two months in the deployment machine. but now error The process or function GetEmployeeDetails is expected to have a parameter @progress which was not supplied 'P> posted on the machine Just came once. Everything works fine before and after the error. Web service code: public function GetLocation (ByVal as the oldNumber integer, ByVal integer as NewNumber, ByVal as the location string, Byval progress form In the form of a string, byVal name as string, byVal ID as string, try the string as Command1 = New SqlCommand ("GetEmployeeDetails" Connection1) with Command1. CommonType = CommandType Stored Surechers Parameter.ed ("@ old number", SQLDB type.int). Value = old number. Parameter.ed ("New Numer", SQLDB type.ins). Value = Newamer. Parameter. Add ("@Space", SQLBT Ype.VarChar, 10). Value = loc...
Read more

c# - The item with identity 'Id' already exists in the metadata collection. Parameter name: item -

-
मेरी सभी संस्थाओं का आधार वर्ग है: सार्वजनिक वर्ग इकाई & lt; TKey & gt; : आईएरिटीटी & lt; टीके & gt; {गतिशील आईईआरटीईटी.आईडी {प्राप्त करें} इस आईआईडी; } सेट {this.Id = मान; }} सार्वजनिक TKey Id {get; सेट; }} उदाहरण के लिए स्थिति इकाई: [मेटाडाटा टाइप (टाइपफ (स्टेटसमैटडेटा))] सार्वजनिक आंशिक श्रेणी की स्थिति: इकाई & lt; बाइट & gt; {सार्वजनिक स्ट्रिंग शीर्षक {प्राप्त करें; सेट; }} जब मैं डेटाबेस के विरुद्ध क्वेरी चलाऊँगा तो मुझे निम्न त्रुटि मिलती है: "पहचान 'आईडी वाला आइटम पहले से ही मेटाडेटा संग्रह में मौजूद है। पैरामीटर का नाम: आइटम" क्या यह तय करने का कोई तरीका है या यह किसी वारसा के कारण हुई समस्या है और मैं किसी भी वर्ग से अपनी संस्थाओं का वारिस नहीं कर सकता हूं? यह एक सामान्य त्रुटि है, कुछ जानकारी के लिए खोज करते हुए, मैंने देखा कि: दो तालिकाओं को एक प्राथमिक कुंजी के लिए एक ही नाम हो सकता है लाइटस्विच टेबल्स को देखो, उन सभी को एक प्राथमिक कुंजी है जिन्हें आईडी कहा जाता है। इसलिए, मैं सभी संस्थाओं की समीक्षा करता ह...
Read more

c++ - Redefined variable in the other module -

-
Why do we redefine the variable in other modules, so it is OK to add this module together? I have written two modules main.cpp and module.cpp as the following: // - main.cpp-- // # include & lt; Stdio.h & gt; Int main () {int i = 5; Printf ("I value is% d", i); } and // - module.cpp - // int i = 7; I am now compiling and adding g ++ as the following: g ++ -c main .cpp g ++ - c module. cao g ++ - o bin main.o module.o and it's okay. But I hope the compilation will be successful, while the linker will throw an exception like redefining varaible when I'm running .bin output then the value of i is 5 . UPD: I understand that if we use I as global variable module main.cpp that linker will throw an error. The main variable in the function is a local variable of i function. It is not visible and is present outside the function is. Consider the following example #include & lt; Iostream & gt; Int i = 3; Int main (...
Read more