perl 변수$/의 용법 으로 컨 텍스트 를 줄 모드 로 해석 할 때$/정의 가 무엇 으로 줄 을 나 눌 것 입 니까?

기본 적 인 상태 에서 모든 줄 을 구분 하 는 데 사용 되 고 줄 바 꿈 문자 로 도 불 린 다.시퀀스 를 읽 을 때 줄 별로 읽 을 때 줄 바 꿈 자 를 기준 으로 합 니 다.읽 은 strawberry 1.gb 의 파일 내용 은 다음 과 같 습 니 다.LOCUS JX 18024 460 bp DNA linear PLN 25-EP-2012 DEFINITION Fragaria vesca subsp.americana RNA polymerase beta subunit(rpoC 1)gene,partial cds;plastid./ACCESSION JX 18024//VERSION JX 18024.1 GI:402238751 KEYWORDS.how//SOURCE plastid Fragaria vesca subsp.americana 의 첫 번 째 예:기본 상황

 
#!/bin/perl 
my $record =' '; 
open (DNAFILENAME,'f:\\perl\\strawberry1.gb')||die("can not open the file!"); 
$record = <DNAFILENAME>; 
print $record; 

이것 은 아무런 변동 이 없 는 상황,즉 기본적으로 한 줄 을 읽 을 때마다,결 과 는 다음 과 같 습 니 다.F:\>perl\b.pl LOCUS JX 18024 460 bp DNA linear PLN 25-EP-2012 우리 가$/의 값 을 바 꾸 면 우리 파일 의 특징 에 따라$/="///로 변경 합 니 다

 
#!/bin/perl 
my $record =' '; 
open (DNAFILENAME,'f:\\perl\\strawberry1.gb')||die("can not open the file!"); 
$/="///
"; 
$record = <DNAFILENAME>; 
print $record; 

우리 가 얻 은 결 과 는 다음 과 같다.F:\>perl\b.pl LOCUS JX 18024 460 bp DNA linear PLN 25-EP-2012 DEFINITION Fragaria vesca subsp.americana RNA polymerase beta subunit(rpoC 1)gene,partial cds;plastid./ACCESSION JX 18024//VERSION JX 18024.1 GI:402238751 KEYWORDS.how//우 리 는 여기에서 볼 수 있 습 니 다.이 줄 은//를 구분자 로 하고///이상 의 전체 부분 을 한 줄 로 봅 니 다.마찬가지 로 문자 뿐만 아니 라 알파벳 도 가능 합 니 다.how 를 구분자 로 합 니 다.$/="how"를 추가 합 니 다.결 과 는 다음 과 같다.C:\\Documents and Settings\\Administrator>f:perl\\b.pl LOCUS JX 18024 460 bp DNA linear PLN 25-EP-2012 DEFINITION Fragaria vesca subsp.americana RNA polymerase beta subunit(rpoC 1)gene,partial cds;plastid./ACCESSION JX 18024//VERSION JX 18024.1 GI:402238751 KEYWORDS.how C:\\Documents and Settings\\Administrator>역시 우 리 는 전통 적 인 의미 의 행 을 완전히 버 릴 수 있다.예 를 들 어,우 리 는 예 중의 다섯 번 째 줄 의 ACCESSION 을 구분자 로 한다

 
#!/bin/perl 
my $record =' '; 
open (DNAFILENAME,'f:\\perl\\strawberry1.gb')||die("can not open the file!"); 
$/="how
"; 
$record = <DNAFILENAME>; 
print $record; 

결 과 는 다음 과 같다.F:\>perl\\b.pl LOCUS JX 18024 460 bp DNA linear PLN 25-EP-2012 DEFINITION Fragaria vesca subsp.americana RNA polymerase beta subunit(rpoC 1)gene,partial cds;plastid./ACCESSION F:\>다시 한 번 예 를 들 어 보 겠 습 니 다./를 구분자 로 합 니 다

 
#!/bin/perl 
my $record =' '; 
open (DNAFILENAME,'f:\\perl\\strawberry1.gb')||die("can not open the file!"); 
$/="ACCESSION"; 
$record = <DNAFILENAME>; 
print $record; 

우리 가 원 하 는 결 과 는 네 번 째 줄 에 맞 는 이전 내용 을 한 줄 로 해 야 합 니 다.그러나 결 과 는 이 렇 습 니까?F:\>perl\b.pl LOCUS JX118024 460 bp DNA linear PLN 25-SEP-2012 DEFINITION Fragaria vesca subsp. americana RNA polymerase beta subunit (rpoC1) gene, partial cds; plastid./ACCESSION JX 18024//F:\>왜 첫 번 째/와 일치 하지 않 습 니까?사실 여기/이 줄 은 하나의/만 있 는 것 이 아니 라 다른 성분 이 있 습 니 다.우 리 는 이 줄 을 완전히 삭제 한 다음 에 다시 하나의/만 입력 합 니 다.우 리 는 F:\>perl\b.pl LOCUS JX 18024 460 bp DNA linear PLN 25-EP-2012 DEFINITION Fragaria vesca subsp.americana RNA polymerase beta subunit(rpoC 1)gene,partial cds 와 일치 합 니 다.plastid./F:\>이번에 정확 한 결 과 를 얻 었 습 니 다.