perl - string compare failing while fetching a line from a file. -


मेरा कोड, 

  #! / Usr / bin / perl -w सख्त का उपयोग करें; चेतावनियों का उपयोग करें; मेरे $ कोड = ""; मेरी $ गणना = 0; मेरी $ str1 = "code1"; खुली (फ़ाइल, '/होम / वीपीएनयूजर / टेस्टफाइल। टी। टी। टी। ") या मरना (" फ़ाइल खोलना नहीं जा सका "); जबकि ($ कोड = & lt; FILE & gt;) {प्रिंट ($ कोड); यदि ($ codes eq $ str1) {$ count ++; }} प्रिंट "$ count";   
 तुलना हमेशा विफल रहता है मेरे testFile.txt में एक सरल लाइन - कोड 1 है जब मैंने एक अलग पर्ल लिपि लिखी है जहां मेरे पास स्क्रिप्ट में दो स्ट्रिंग हैं जो इसे फ़ाइल से प्राप्त करने के बजाय स्वयं की गई है, तो eq ऑपरेटर ठीक काम करता है लेकिन जब मैं इसे फाइल से प्राप्त कर रहा हूं, तो एक समस्या है। अग्रिम धन्यवाद!   
 
 
 अगर आप नहीं चाहते हैं तो अपने फ़ाइल इनपुट को मत भूलना यह एक रिटर्न कैरेक्टर में समाप्त होता है।  
  जबकि (मेरे $ कोड = & lt; FILE & gt;) {chomp $ codes;   
 यही कारण है कि आपकी स्ट्रिंग की तुलना असफल रहने का कारण हो सकता है।  
 अतिरिक्त के रूप में, आपकी स्क्रिप्ट के शीर्ष पर और साथ ही, हमेशा ऐसा करते हैं।  
 मैं सुझाव देना चाहूंगा कि आप फ़ाइल प्रसंस्करण करते समय शीर्ष पर भी शामिल होते हैं। यह स्वचालित रूप से कई प्रकार के आपरेशनों के लिए एक विस्तृत त्रुटि संदेश देगा, जैसे फ़ाइल खोलने, ताकि आपको त्रुटि कोड  $!  या आपके फ़ाइल नाम को याद रखना पड़ेगा < कोड> मर  कथन।

Comments

Post a Comment

Popular posts from this blog

c++ - why does this code produce a runtime error? -

contains # lt; Stdio.h & gt; #to & lt include, conio.h & gt; #to & lt include, windows.h & gt; Structure node {int a; Structure node * next; }; Zero constructivist (Structure node ** head) {struct node * p, * temp; Int n; Printf ("Enter number \ n"); Scanf ("% d", & amp; n); P = (straight node *) maulok (psychophag (strip node)); P-> = N; If (* head == 0) {* head = p; P-> Next = 0; Temporary = p; } And {temp-> next = p; Temporary = p; P-> Next = 0; }} Void frontbacksplit (Structure node ** head, Structure node ** Head1, Structure node ** Head 2) {int counter = 0, i; Structure node * temporary, * p; Temporary = * head; While (temporary! = 0) {counter ++; Temporary = temp-> Next; } Int n; If (counter% 2 == 0) {n = counter / 2; } And {n = (counter + 1) / 2; } Temp = * head; (I = 0; i & lt; n-1; i ++) for {if (* head1 == 0) {* head1 = temp; } Temp = temp- & gt; next; } P = temp; Temporary = temp-> Next; P-> Next ...
Read more

Android - Facebook GraphUser has no email attribute -

I checked online sources about this issue and checked it twice - but I still get the email attribute Can not Facebook Response As indicated on the launch, I have applied the permissions ("original_third", "email", "user_bridade") to read on the login buttons. Also set the same permissions when creating a session (session .createFromExistingAccessToken). However, on the callback function, when the GraphUser and Response object is logged, I was still not able to retrieve the user's email. Why the error still persists, what are the possible reasons for this? Am I missing some steps? ** onCreate () ** ((Login button) ViewById (R.id.dialog_generic_footer_button_fblogin)) .setPublishPermissions (FBSessionV2.getPermissions ()); String & gt; GetPermissions () {if (permissions.ISTT)} {PERMISSIONS.add ("basic_info"); PERMISSIONS.add ("email"); PERMISSIONS.add ("publish_actions"); PERMISSIONS.add ("user_birthda...
Read more

Opencart and VQMOD issue: Could not load controller in vq2-system_engine_controller.php -

I am using Opencart 1.5.6.1 and VQMOD 2.4.1. I have installed the Ewe Rapid 3.0 extension now and at checkout, I get this error: Notice: Error: Controller payment / EVE could not be loaded! On line 47 trigger_error ('Error: Could not load controller'. ($) At $ ($) ... \ vqmod \ vqcache \ vq2-system_engine_controller.php in line children! '!'); I'm not sure whether this is anything with the VQMD or EVE extension. How to fix this? Steps to try: Check if you have a eway.php in the list / controller / payment folder Verify the square name of that file: Class Controller Payment and Controller { . Check file permissions. It's a good day!
Read more