青青草原综合久久大伊人导航_色综合久久天天综合_日日噜噜夜夜狠狠久久丁香五月_热久久这里只有精品

統計

  • 隨筆 - 50
  • 文章 - 42
  • 評論 - 147
  • 引用 - 0

留言簿(6)

隨筆分類

文章分類

Link

搜索

  •  

積分與排名

  • 積分 - 166529
  • 排名 - 159

最新評論

閱讀排行榜

評論排行榜

Predefined Names

Predefined Names

The following names have special meaning to perl. I could have used alphabetic symbols for some of these, but I didn't want to take the chance that someone would say reset "a-zA-Z" and wipe them all out. You'll just have to suffer along with these silly symbols. Most of them have reasonable mnemonics, or analogues in one of the shells.

$_
The default input and pattern-searching space. The following pairs are equivalent:
	while (<>) {...	# only equivalent in while!
while ($_ = <>) {...
/^Subject:/
$_ =~ /^Subject:/
y/a-z/A-Z/
$_ =~ y/a-z/A-Z/
chop
chop($_)
(Mnemonic: underline is understood in certain operations.)

 

$.
The current input line number of the last filehandle that was read. Readonly. Remember that only an explicit close on the filehandle resets the line number. Since <> never does an explicit close, line numbers increase across ARGV files (but see examples under eof). (Mnemonic: many programs use . to mean the current line number.)

 

$/
The input record separator, newline by default. Works like awk's RS variable, including treating blank lines as delimiters if set to the null string. You may set it to a multicharacter string to match a multi-character delimiter. Note that setting it to "\n\n" means something slightly different than setting it to "", if the file contains consecutive blank lines. Setting it to "" will treat two or more consecutive blank lines as a single blank line. Setting it to "\n\n" will blindly assume that the next input character belongs to the next paragraph, even if it's a newline. (Mnemonic: / is used to delimit line boundaries when quoting poetry.)

 

$,
The output field separator for the print operator. Ordinarily the print operator simply prints out the comma separated fields you specify. In order to get behavior more like awk, set this variable as you would set awk's OFS variable to specify what is printed between fields. (Mnemonic: what is printed when there is a , in your print statement.)

 

$""
This is like $, except that it applies to array values interpolated into a double-quoted string (or similar interpreted string). Default is a space. (Mnemonic: obvious, I think.)

 

$\
The output record separator for the print operator. Ordinarily the print operator simply prints out the comma separated fields you specify, with no trailing newline or record separator assumed. In order to get behavior more like awk, set this variable as you would set awk's ORS variable to specify what is printed at the end of the print. (Mnemonic: you set $\ instead of adding \n at the end of the print. Also, it's just like /, but it's what you get "back" from perl.)

 

$#
The output format for printed numbers. This variable is a half-hearted attempt to emulate awk's OFMT variable. There are times, however, when awk and perl have differing notions of what is in fact numeric. Also, the initial value is %.20g rather than %.6g, so you need to set $# explicitly to get awk's value. (Mnemonic: # is the number sign.)

 

$%
The current page number of the currently selected output channel. (Mnemonic: % is page number in nroff.)

 

$=
The current page length (printable lines) of the currently selected output channel. Default is 60. (Mnemonic: = has horizontal lines.)

 

$-
The number of lines left on the page of the currently selected output channel. (Mnemonic: lines_on_page - lines_printed.)

 

$~
The name of the current report format for the currently selected output channel. Default is name of the filehandle. (Mnemonic: brother to $^.)

 

$^
The name of the current top-of-page format for the currently selected output channel. Default is name of the filehandle with "_TOP" appended. (Mnemonic: points to top of page.)

 

$|
If set to nonzero, forces a flush after every write or print on the currently selected output channel. Default is 0. Note that STDOUT will typically be line buffered if output is to the terminal and block buffered otherwise. Setting this variable is useful primarily when you are outputting to a pipe, such as when you are running a perl script under rsh and want to see the output as it's happening. (Mnemonic: when you want your pipes to be piping hot.)

 

$$
The process number of the perl running this script. (Mnemonic: same as shells.)

 

$?
The status returned by the last pipe close, backtick (\`\`) command or system operator. Note that this is the status word returned by the wait() system call, so the exit value of the subprocess is actually ($? >> 8). $? & 255 gives which signal, if any, the process died from, and whether there was a core dump. (Mnemonic: similar to sh and ksh.)

 

$&
The string matched by the last successful pattern match (not counting any matches hidden within a BLOCK or eval enclosed by the current BLOCK). (Mnemonic: like & in some editors.)

 

$\`
The string preceding whatever was matched by the last successful pattern match (not counting any matches hidden within a BLOCK or eval enclosed by the current BLOCK). (Mnemonic: \` often precedes a quoted string.)

 

$'
The string following whatever was matched by the last successful pattern match (not counting any matches hidden within a BLOCK or eval enclosed by the current BLOCK). (Mnemonic: ' often follows a quoted string.) Example:
	$_ = 'abcdefghi';
/def/;
print "$\`:$&:$'\n";  	# prints abc:def:ghi

 

$+
The last bracket matched by the last search pattern. This is useful if you don't know which of a set of alternative patterns matched. For example:
    /Version: (.*)|Revision: (.*)/ && ($rev = $+);
(Mnemonic: be positive and forward looking.)

 

$*
Set to 1 to do multiline matching within a string, 0 to tell perl that it can assume that strings contain a single line, for the purpose of optimizing pattern matches. Pattern matches on strings containing multiple newlines can produce confusing results when $* is 0. Default is 0. (Mnemonic: * matches multiple things.) Note that this variable only influences the interpretation of ^ and $. A literal newline can be searched for even when $* == 0.

 

$0
Contains the name of the file containing the perl script being executed. Assigning to $0 modifies the argument area that the ps(1) program sees. (Mnemonic: same as sh and ksh.)

 

$<digit>
Contains the subpattern from the corresponding set of parentheses in the last pattern matched, not counting patterns matched in nested blocks that have been exited already. (Mnemonic: like \digit.)

 

$[
The index of the first element in an array, and of the first character in a substring. Default is 0, but you could set it to 1 to make perl behave more like awk (or Fortran) when subscripting and when evaluating the index() and substr() functions. (Mnemonic: [ begins subscripts.)

 

$]
The string printed out when you say "perl -v". It can be used to determine at the beginning of a script whether the perl interpreter executing the script is in the right range of versions. If used in a numeric context, returns the version + patchlevel / 1000. Example:
	# see if getc is available
($version,$patchlevel) =
$] =~ /(\d+\.\d+).*\nPatch level: (\d+)/;
print STDERR "(No filename completion available.)\n"
if $version * 1000 + $patchlevel < 2016;
or, used numerically,
	warn "No checksumming!\n" if $] < 3.019;
(Mnemonic: Is this version of perl in the right bracket?)

 

$;
The subscript separator for multi-dimensional array emulation. If you refer to an associative array element as
	$foo{$a,$b,$c}
it really means
	$foo{join($;, $a, $b, $c)}
But don't put
	@foo{$a,$b,$c}		# a slice--note the @
which means
	($foo{$a},$foo{$b},$foo{$c})
Default is "\034", the same as SUBSEP in awk. Note that if your keys contain binary data there might not be any safe value for $;. (Mnemonic: comma (the syntactic subscript separator) is a semi-semicolon. Yeah, I know, it's pretty lame, but $, is already taken for something more important.)

 

$!
If used in a numeric context, yields the current value of errno, with all the usual caveats. (This means that you shouldn't depend on the value of $! to be anything in particular unless you've gotten a specific error return indicating a system error.) If used in a string context, yields the corresponding system error string. You can assign to $! in order to set errno if, for instance, you want $! to return the string for error n, or you want to set the exit value for the die operator. (Mnemonic: What just went bang?)

 

$@
The perl syntax error message from the last eval command. If null, the last eval parsed and executed correctly (although the operations you invoked may have failed in the normal fashion). (Mnemonic: Where was the syntax error "at"?)

 

$<
The real uid of this process. (Mnemonic: it's the uid you came FROM, if you're running setuid.)

 

$>
The effective uid of this process. Example:
	$< = $>;	# set real uid to the effective uid
($<,$>) = ($>,$<);	# swap real and effective uid
(Mnemonic: it's the uid you went TO, if you're running setuid.) Note: $< and $> can only be swapped on machines supporting setreuid().

 

$(
The real gid of this process. If you are on a machine that supports membership in multiple groups simultaneously, gives a space separated list of groups you are in. The first number is the one returned by getgid(), and the subsequent ones by getgroups(), one of which may be the same as the first number. (Mnemonic: parentheses are used to GROUP things. The real gid is the group you LEFT, if you're running setgid.)

 

$)
The effective gid of this process. If you are on a machine that supports membership in multiple groups simultaneously, gives a space separated list of groups you are in. The first number is the one returned by getegid(), and the subsequent ones by getgroups(), one of which may be the same as the first number. (Mnemonic: parentheses are used to GROUP things. The effective gid is the group that's RIGHT for you, if you're running setgid.)

Note: $<, $>, $( and $) can only be set on machines that support the corresponding set[re][ug]id() routine. $( and $) can only be swapped on machines supporting setregid().

 

$:
The current set of characters after which a string may be broken to fill continuation fields (starting with ^) in a format. Default is "\ \n-", to break on whitespace or hyphens. (Mnemonic: a "colon" in poetry is a part of a line.)

 

$^D
The current value of the debugging flags. (Mnemonic: value of -D switch.)

 

$^F
The maximum system file descriptor, ordinarily 2. System file descriptors are passed to subprocesses, while higher file descriptors are not. During an open, system file descriptors are preserved even if the open fails. Ordinary file descriptors are closed before the open is attempted.

 

$^I
The current value of the inplace-edit extension. Use undef to disable inplace editing. (Mnemonic: value of -i switch.)

 

$^L
What formats output to perform a formfeed. Default is \f.

 

$^P
The internal flag that the debugger clears so that it doesn't debug itself. You could conceivable disable debugging yourself by clearing it.

 

$^T
The time at which the script began running, in seconds since the epoch. The values returned by the -M , -A and -C filetests are based on this value.

 

$^W
The current value of the warning switch. (Mnemonic: related to the -w switch.)

 

$^X
The name that Perl itself was executed as, from argv[0].

 

$ARGV
contains the name of the current file when reading from <>.

 

@ARGV
The array ARGV contains the command line arguments intended for the script. Note that $#ARGV is the generally number of arguments minus one, since $ARGV[0] is the first argument, NOT the command name. See $0 for the command name.

 

@INC
The array INC contains the list of places to look for perl scripts to be evaluated by the "do EXPR" command or the "require" command. It initially consists of the arguments to any -I command line switches, followed by the default perl library, probably "/usr/local/lib/perl", followed by ".", to represent the current directory.

 

%INC
The associative array INC contains entries for each filename that has been included via "do" or "require". The key is the filename you specified, and the value is the location of the file actually found. The "require" command uses this array to determine whether a given file has already been included.

 

$ENV{expr}
The associative array ENV contains your current environment. Setting a value in ENV changes the environment for child processes.

 

$SIG{expr}
The associative array SIG is used to set signal handlers for various signals. Example:
	sub handler {	# 1st argument is signal name
local($sig) = @_;
print "Caught a SIG$sig--shutting down\n";
close(LOG);
exit(0);
}
$SIG{'INT'} = 'handler';
$SIG{'QUIT'} = 'handler';
...
$SIG{'INT'} = 'DEFAULT';	# restore default action
$SIG{'QUIT'} = 'IGNORE';	# ignore SIGQUIT
The SIG array only contains values for the signals actually set within the perl script.

posted on 2009-03-04 18:10 pear_li 閱讀(447) 評論(0)  編輯 收藏 引用 所屬分類: perl

青青草原综合久久大伊人导航_色综合久久天天综合_日日噜噜夜夜狠狠久久丁香五月_热久久这里只有精品
  • <ins id="pjuwb"></ins>
    <blockquote id="pjuwb"><pre id="pjuwb"></pre></blockquote>
    <noscript id="pjuwb"></noscript>
          <sup id="pjuwb"><pre id="pjuwb"></pre></sup>
            <dd id="pjuwb"></dd>
            <abbr id="pjuwb"></abbr>
            亚洲黄色一区| 欧美淫片网站| 欧美国产亚洲精品久久久8v| 久久久久久一区二区| 在线不卡a资源高清| 欧美成人综合| 欧美日韩色婷婷| 欧美一区二区三区在| 久久精品日韩| 亚洲精品欧美一区二区三区| 99精品欧美一区二区三区| 欧美午夜美女看片| 久久精品欧洲| 欧美精品久久久久久久久久| 亚洲欧美日本国产专区一区| 欧美在线免费观看亚洲| 亚洲精品久久久久久下一站 | 久久天堂av综合合色| 亚洲精品国精品久久99热| 99精品99| 在线播放视频一区| 99精品视频免费全部在线| 国产一区二区三区直播精品电影 | 亚洲欧美日韩专区| 最近中文字幕日韩精品| 亚洲资源av| 亚洲日本中文字幕区| 亚洲欧美视频一区| 99ri日韩精品视频| 久久久免费精品| 亚洲一级电影| 欧美aⅴ99久久黑人专区| 亚洲欧美99| 欧美精品1区| 嫩草国产精品入口| 国产精品综合| 日韩视频一区二区三区在线播放免费观看 | 免费成人黄色| 欧美影视一区| 欧美体内谢she精2性欧美| 另类欧美日韩国产在线| 国产精品午夜在线观看| 亚洲日本在线视频观看| 伊人久久大香线蕉综合热线| 亚洲一区二区在线播放| 中文有码久久| 欧美精品亚洲精品| 亚洲国产精品传媒在线观看| 狠狠色综合网站久久久久久久| 亚洲先锋成人| 亚洲在线免费视频| 欧美日韩xxxxx| 亚洲第一页自拍| 亚洲激情一区二区三区| 久久九九热re6这里有精品| 欧美一级免费视频| 国产精品女主播一区二区三区| 亚洲裸体在线观看| 日韩一级大片在线| 欧美精品在线播放| 日韩视频一区二区在线观看| 日韩亚洲欧美精品| 欧美日韩国产色视频| 亚洲欧洲一区二区天堂久久| 最新国产成人在线观看| 欧美激情区在线播放| 亚洲精品国产精品乱码不99按摩| 日韩视频永久免费| 欧美乱人伦中文字幕在线| 日韩亚洲视频在线| 亚洲综合社区| 国产日韩精品在线播放| 西瓜成人精品人成网站| 麻豆精品视频在线| 91久久久久久| 欧美性猛交一区二区三区精品| 亚洲视频综合在线| 久久久久久久波多野高潮日日| 国产一区三区三区| 蜜桃精品一区二区三区| 亚洲精品日韩久久| 亚洲欧美国产另类| 国产一区二区三区在线观看网站| 久久久亚洲高清| 亚洲激情偷拍| 亚洲一区不卡| 国产在线观看精品一区二区三区 | 中文亚洲免费| 久久免费视频在线| 亚洲激情网址| 国产精品爽爽爽| 久久亚洲私人国产精品va| 亚洲国产视频直播| 午夜精品国产更新| 亚洲国产精品综合| 国产精品乱人伦中文| 久久野战av| 在线视频精品一| 免费观看成人网| 亚洲午夜未删减在线观看| 国外成人网址| 欧美日韩性生活视频| 欧美影视一区| 洋洋av久久久久久久一区| 久久在线免费观看视频| 亚洲午夜精品在线| 亚洲国产精品成人综合| 国产精品久久久久影院亚瑟| 另类av一区二区| 亚洲免费一在线| 亚洲人成77777在线观看网| 久久久福利视频| 亚洲一区二区三区四区五区黄| 一区免费观看视频| 国产精品亚洲成人| 欧美日韩亚洲综合在线| 久久天堂精品| 欧美亚洲综合在线| 亚洲午夜精品久久久久久app| 欧美激情在线| 老牛国产精品一区的观看方式| 亚洲欧美日韩电影| 一区二区免费在线播放| 亚洲国产精品成人精品| 黑人一区二区| 国产资源精品在线观看| 国产精品女人毛片| 国产精品久久久久一区二区| 欧美精品一区二| 欧美电影免费| 免费黄网站欧美| 蜜臀99久久精品久久久久久软件 | 亚洲作爱视频| 一本色道久久综合狠狠躁篇怎么玩 | 国内精品久久久久久| 国产精品免费aⅴ片在线观看| 欧美美女操人视频| 欧美理论电影在线观看| 欧美精彩视频一区二区三区| 免费人成精品欧美精品| 久久婷婷av| 欧美成人一区二区三区片免费| 开心色5月久久精品| 久久全球大尺度高清视频| 久久久久久高潮国产精品视| 欧美综合二区| 久久香蕉精品| 欧美精品aa| 国产精品夫妻自拍| 国产酒店精品激情| 国产主播喷水一区二区| 激情欧美一区二区三区| 亚洲国产精彩中文乱码av在线播放| 1024国产精品| 日韩视频在线一区| 亚洲综合色丁香婷婷六月图片| 午夜精品区一区二区三| 久久成人人人人精品欧| 久久五月天婷婷| 欧美激情视频免费观看| 亚洲美女在线一区| 亚洲伊人第一页| 久久欧美中文字幕| 欧美精品乱码久久久久久按摩 | 欧美在线免费播放| 蜜臀久久99精品久久久久久9 | 久久综合成人精品亚洲另类欧美| 免费一级欧美片在线播放| 欧美日韩精品一区二区天天拍小说 | 久久不射中文字幕| 欧美成人免费小视频| 亚洲精品美女在线| 香蕉久久国产| 欧美第一黄网免费网站| 国产精品女同互慰在线看| 在线观看欧美日本| 亚洲一区二区三区四区五区午夜| 久久久久久穴| 99精品国产一区二区青青牛奶| 亚洲欧美制服中文字幕| 欧美电影打屁股sp| 国产亚洲精品久久飘花| 亚洲精品资源美女情侣酒店| 性欧美video另类hd性玩具| 欧美激情国产日韩| 午夜精品影院| 欧美日韩一区二区在线视频| 国产一区二区三区高清| 一本色道久久综合一区| 久久三级福利| 亚洲视频久久| 欧美国产日本| 伊人成人网在线看| 亚洲欧美日韩中文视频| 欧美激情第一页xxx| 久久riav二区三区| 国产精品视频一二三| 一区二区三区高清| 欧美激情在线免费观看| 欧美在线观看一区二区|