JSP、Servlet中get要求和post要求的差別總結。本站提示廣大學習愛好者:(JSP、Servlet中get要求和post要求的差別總結)文章只能為提供參考,不一定能成為您想要的結果。以下是JSP、Servlet中get要求和post要求的差別總結正文
默許狀況下,很明顯都是用\n來辨別行,\n也被我們稱作為換行符。
當讀取序列時,按行來讀取時,就是以換行符為尺度。
讀取的strawberry1.gb的文件內容以下:
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 JX118024
//
VERSION JX118024.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 JX118024 460 bp DNA linear PLN 25-SEP-2012
假如我們對$/的值給轉變一下,依照我們文件的特點,我們先修改為$/=“///\n;
#!/bin/perl
my $record =' ';
open (DNAFILENAME,'f:\\perl\\strawberry1.gb')||die("can not open the file!");
$/="///\n";
$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 JX118024
//
VERSION JX118024.1 GI:402238751
KEYWORDS .
how
///
我們可以看到在這裡,這一行是以///為分隔符的,///以上的全部部門都被算作一行。
異樣不只是字符可以作為分隔符,字母也能夠,參加我們以how為分隔符,$/="how\n";
#!/bin/perl
my $record =' ';
open (DNAFILENAME,'f:\\perl\\strawberry1.gb')||die("can not open the file!");
$/="how\n";
$record = <DNAFILENAME>;
print $record;
成果以下:
C:\Documents and Settings\Administrator>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 JX118024
//
VERSION JX118024.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!");
$/="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
F:\>
再來看一個例子:以/\n為分隔符:
#!/bin/perl
my $record =' ';
open (DNAFILENAME,'f:\\perl\\strawberry1.gb')||die("can not open the file!");
$/="/\n";
$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 JX118024
//
F:\>
為何沒有婚配到第一個/ 呢?
其實這裡/這一行其實不是僅唯一一個/,而是還有其他的成份在這裡,我們把這一行完整刪除,然後從新只輸出一個/,我們再來婚配
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.
/
F:\>
此次就獲得准確的成果了。