perl 입문 사이트 와 몇 가지 재 미 있 는 곳
http://www.cbi.pku.edu.cn/chinese/documents/perl/index.htm
--------------------------
. 따옴표 에 있 는 문자열 에서 전의 문 자 를 지원 합 니 다.
Table 3.1. Escape sequences in strings.
Escape Sequence Description
\a Bell (beep)
\b Backspace
\cn The Ctrl+n character
\e Escape
\E Ends the effect of \L, \U or \Q
\f Form feed
\l Forces the next letter into lowercase
\L All following letters are lowercase
Newline
\r Carriage return
\Q Do not look for special pattern characters
\t Tab
\u Force next letter into uppercase
\U All following letters are uppercase
\v Vertical tab
\ L, \ U, \ Q 기능 은 \ \ E 에서 닫 을 수 있 습 니 다. 예 를 들 어:
$a = "T\LHIS IS A \ESTRING"; # same as "This is a STRING"
------------------------
목록 / 배열 의 길이
배열 변수 가 예상 되 는 단순 변수 가 나타 나 는 곳 에 나타 나 면 PERL 해석 기 는 길 이 를 가 져 옵 니 다.
@array = (1, 2, 3);
$scalar = @array; # $scalar = 3, 즉 @ array 의 길이
($scalar) = @array; # $scalar = 1, 즉 @ array 첫 번 째 요소 의 값
주: 배열 의 길 이 를 순환 횟수 로 다음 과 같이 프로 그래 밍 할 수 있 습 니 다.
$count = 1;
while ($count <= @array) {
print ("element $count: $array[$count-1]");
$count++;
}
-------------------------------
@array = (70, 100, 8);
@array = sort(@array); # @array = (100, 70, 8) now
@array2 = reverse(@array);
@array2 = reverse sort (@array);
chop--
join/split-- /
흐름
읽 기: open (MYFILE, "file 1") | die ("파일 을 열 수 없습니다");
쓰기: open (OUTFILE, "> outfile");
print OUTFILE ("Here is an output line.");
닫 기: close (MYFILE); 파일 닫 기
--- --- ------------------------------------------------------------------------
open(INFILE, "infile") && !(-e "outfile") &&
open(OUTFILE, ">outfile") || die("Cannot open files");
-b
-c
-d
-e
-f
-g setgid
-k sticky
-l
-o
-p
-r
-s
-t
-u setuid
-w
-x
-z
-A
-B
-C inode
-M
-O “ ”
-R “ ”
-S socket
-T
-W " "
-X " "
:“ ” userid, ID , suid ID。
- 이것 은 재 미 있 습 니 다. 갑자기 abs 와 결합 하여 보고 싶 습 니 다. - (동시에 몇 가지 언어 를 배 우 는 것 은 한 가지 언어 만 배 우 는 것 보다 간단 합 니 다)
C 처럼 PERL 에 도 명령 행 인 자 를 저장 하 는 배열 @ ARGV 가 있어 각 명령 행 인 자 를 각각 처리 할 수 있 습 니 다. C 와 달리 $ARGV [0] 는 프로그램 이름 자체 가 아 닌 첫 번 째 인자 입 니 다.
$var = $ARGV [0]; \ # 첫 번 째 인자
$numargs = @ ARGV; \ # 매개 변수의 개수
PERL 에서 < > 조작 부 호 는 실제 적 으로 배열 @ ARGV 에 포 함 된 인용 이 고 그 작업 원 리 는 다음 과 같다.
1. PERL 해석 기 가 < > 를 처음 보 았 을 때 $ARGV [0] 라 는 파일 이름 의 파일 을 엽 니 다.
2. 동작 shift (@ ARGV) 를 실행 합 니 다. 즉, 배열 @ ARGV 의 요 소 를 앞으로 이동 하면 그 요소 의 수량 이 하나 줄 어 듭 니 다.
3. < > 연산 자 는 첫 번 째 로 열 린 파일 의 모든 줄 을 읽 습 니 다.
4. 다 읽 은 후에 해석 기 는 첫 번 째 단계 로 돌아 가 반복 합 니 다.
예:
@ARGV = ("my file 1", "my file 2"); \ # 실제 명령 행 매개 변수 에 의 해 할당 됨
while ($line = <>) {
print ($line);
}
파일 my file 1 과 my file 2 의 내용 을 인쇄 합 니 다.
파이프
open (MESSAGE, "| cat >hello");
print MESSAGE ("Hi, Dave! Your Perl program sent this!");
close (MESSAGE);
순환
@list = (1, 2, 3, 4, 5);
foreach $temp (@list) {
if ($temp == 2) {
$temp = 20;
}
}
서브루틴
1、 &
&subname;
...
sub subname{
...
}
2、 , &
sub subname{
...
}
...
subname;
3、 , ,
sub subname;
...
subname;
...
sub subname{
...
}
4、 do
do my_sub(1, 2, 3); &my_sub(1, 2, 3);
알 아 보지 못 하 다
http://www.cbi.pku.edu.cn/chinese/documents/perl/perl8.htm
구조 함수 분석 함수
BEGIN {
print("Hi! Welcome to Perl!");
}
AUTOLOAD{
print ("subroutine $AUTOLOAD not found"); \ # 변수 $AUTOLOAD 는 찾 을 수 없 는 서브루틴 이름 입 니 다.
print("arguments passed: @_");
}
END{}
이 내용에 흥미가 있습니까?
현재 기사가 여러분의 문제를 해결하지 못하는 경우 AI 엔진은 머신러닝 분석(스마트 모델이 방금 만들어져 부정확한 경우가 있을 수 있음)을 통해 가장 유사한 기사를 추천합니다:
cowsay로 현장 고양이에 요시! 되고 싶은 건업무 중에도 현장 고양이에 요시! 하고 싶었기 때문에, cowsay 를 사용해 어떻게든 해 보았습니다. cowsay는 말할 것도없이 오징어 한 서버에 적합한 매혹적인 도구입니다. 살벌한 우리 마음에 일복의 청량을 줍...
텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.
CC BY-SA 2.5, CC BY-SA 3.0 및 CC BY-SA 4.0에 따라 라이센스가 부여됩니다.