perl의 문자열 조작 함수 chomp와 chop 소개

chomp와 chop은 문자열 변수의 끝을 제거하는 데 사용되는 문자이지만, 각각의 차이가 있습니다.
chomp 함수는 변수에 작용하며, 이 변수는 문자열을 포함합니다.문자열의 끝에 줄 바꾸기가 있으면 chomp에서 삭제할 수 있습니다.이것은 기본적으로 그것이 완성할 수 있는 모든 기능이다. 예를 들어 다음과 같다.

 
  
 $text="alineoftext
      "; #       
  
 chomp($text);    #     (
)。 
  
 
 

그것은 매우 유용해서 기본적으로 너의 모든 프로그램이 그것을 사용할 것이다.알다시피 이것은 문자열의 끝을 줄로 바꾸는 가장 좋은 방법이다.Perl의 기본 원칙에 근거한다. 변수를 사용해야 하는 곳에서는 값 부여 표현식으로 대체할 수 있다.우리는 더 간단하게 초프를 사용하는 방법이 있다.Perl은 우선 값을 부여하는 연산을 하고 이 변수를 사용합니다.따라서 chomp를 사용하는 가장 일반적인 방법은 다음과 같습니다.

 
  
 chomp($text=);    #  ，       
  
 $text=; 
  
 chomp($text); 
   
  
#  ，      
 
 
 

첫눈에 봤을 때 첫 번째 조합 방법은 좀 복잡해 보였다.만약 상술한 것을 두 단계 조작으로 보고 한 줄을 읽고 초프를 한다면 두 문장을 쓰는 방법은 좀 자연스러워 보일 것이다.만약 그것을 하나의 조작으로 간주한다면, 한 줄에 읽지만 줄 바꾸기를 포함하지 않는다면, 한 문장으로 쓰는 방법이 더욱 적절하다.절대 다수의 Perl 프로그래머들이 첫 번째 쓰기 방법을 사용하기 때문에, 너도 그것을 사용해야 한다.
chomp는 함수입니다.함수로서, 제거된 문자의 개수를 되돌려주는 값이 있습니다.이 숫자는 기본적으로 쓸모가 없다.

 
  
 $food=; 
  
 $betty=chomp($food); #    1 
  
 
 

위와 같이 chomp를 사용할 때 괄호()를 사용하거나 사용하지 않을 수 있습니다.이것은 Perl의 일반적인 규칙입니다. 그것을 제거할 때 의미가 바뀌지 않으면 괄호는 생략할 수 있습니다.만약 마지막에 두 개 혹은 두 개 이상의 줄 바꾸기 문자가 있다면,chomp는 하나만 제거합니다.없으면 아무것도 하지 않고 0으로 돌아갑니다.한 번에 한 줄을 읽을 때는 일어나지 않지만, 입력 구분자 (input separator) ($/) (줄 바꾸기 () 가 아니라read 함수, 혹은 문자열을 결합하면 발생할 수 있습니다.
Perl 프로그램 코드를 작성할 때, < > 입력한 줄 바꾸기 문자 "를 chop () 함수로 삭제할 수도 있고, chomp () 함수를 사용할 수도 있습니다.사실 위의 용법은 모두 예상한 효과에 도달할 수 있지만 그것들도 미세한 차이가 있다.chop () 함수입니다. 마지막 문자만 제거합니다.chomp () 함수는 마지막 문자가 '인지 아닌지를 먼저 판단해야 제거합니다.
chop 함수는 문자열 변수의 마지막 문자를 잘라내고 잘라진 문자를 되돌려줍니다. chop 함수는 문자열에 무엇이든 짧게 자르지만 chomp 함수는 선택적입니다.chop 직접 양은 안 되고 chop 변수만 가능합니다.사용법:

 
  
 chop VARIABLE 
  
 chop LIST 
  
 chop 
  
 
 

예:
chop에 LIST 변수가 나열되면 목록의 각 문자열이 짧아집니다.

 
  
 @lines=`cat myfile`; 
  
 chop @lines; 
  
 
 

가장 흔히 볼 수 있는 상황에서 chop은substr로 표시할 수 있다.

 
  
 $last_char = chop($var); 
  
 $last_char = substr($var, -1, 1, ""); #    
  
 
 

다음의 완전한 예를 살펴보자.

 
  
 #!/usr/bin/perl 
  
 $string1 = "This is test"; 
  
 $retval  = chop( $string1 ); 
  
 print " Choped String is : $string1
"; 
  
 print " Character removed : $retval
"; 
  
 
 

결과:

 
  
 Choped String is : This is tes 
  
 Number of characters removed : t