Perl中的符號(hào) ->;、=>; 和 :: 分別表示什么意思?
What do the ->, => and :: symbols mean?
The -> is the "infix dereference operator". In other words it is the means by which one calls a sub with a pass by reference (among other things you can do with ->). As stated above most things in calls to perl/Tk routines are passed by reference. The -> is used in perl just as in C or C++. (Most of the widget primitives are elements of the Tk:: "perl class".) A simple example of dereferencing would be: $x = { def => bar }; # $x is a reference to an anon. hash print $x->{def},"/n"; # prints ``bar''
Note that in the case of calling perl/Tk subs there may be more than one way to call by reference. Compare my($top) = MainWindow->new;
with my($top) = new MainWindow;
But in general you will be making extensive use of calls like: $top -> Widge-type;
There is a clear and succint discussion of references, dereferences, and even closures in man perlref(1) or see the perl 5 info page at: http://www.metronet.com/perlinfo/perl5.html
The use of the => operator is quite common in perl/Tk scripts. Quoting from man perlop(1):
The => digraph is simply a synonym for the comma operator. It's useful for documenting arguments that come in pairs.
You could say that => is used for aesthetic or organizational reasons. Note in the following how hard it is to keep track of whether or not every -option has an argument: $query -> Button(-in,/$reply,-side,'left',-padx,2m,-pady, 2m,-ipadx,2m,-ipady,1m)->pack(-side,'bottom');
As opposed to: $query ->Button( -in => /$reply, -side => 'left', -padx => 2m, -pady => 2m, -ipadx => 2m, -ipady => 1m )->pack(-side => 'bottom');
By the way if you wanted the numeric "greater than or equal" you would use >= not =>.
While the :: symbol can be thought of as similar to the period in a C struct, it is much more akin to the :: class scope operator in C++: a.b.c; /* something in C */ a::b::c(); // function in C++ $a::b::c; # a scalar in Perl 5 @a::b::c; # a list in Perl 5 %a::b::c; # an associative array or "hash" in Perl 5 &a::b::c; # a function in Perl 5
It is also analogous to the single forward quotation mark in perl 4: $main'foo; # a $foo scalar in perl 4 $main::foo; # a $foo scalar in Perl 5
For backward compatibility perl 5 allows you to refer to $main'foo but $main::foo is recommended.
譯文:
符號(hào)->,=>和::分別表示什么意思?
‘- >'符號(hào)是“插入式解引用操作符”(infix dereference operator)。換句話說,它是調(diào)用由引用傳遞參數(shù)的子程序的方法(當(dāng)然,還有其它的作用)。正如我們上面所提到的,在調(diào)用Perl/Tk的函數(shù)的時(shí)候,大部分參數(shù)都是通過引用傳遞的。Perl中的‘->'功能就和它們?cè)贑或C++中一樣。(大部分原始的組件都是Tk中的Perl類的元素。)下面是一個(gè)簡單的解引用的例子:
$x = { def => bar }; # $x是指向一個(gè)匿名hash的引用
print $x->{def},"/n"; # 輸出``bar''
注意,在調(diào)用Perl/Tk的子程序時(shí)有多種不同的方法進(jìn)行引用。我們可以比較一下:
my($top) = MainWindow->new;
和
my($top) = new MainWindow;
兩種方法的不同。
但是,一般來說我們通常都使用這樣的方法調(diào)用:
$top -> Widge-type;
在perlref的手冊(cè)頁中有詳盡的關(guān)于引用、解引用、和閉包的討論,或者也可以在下面的網(wǎng)頁上查看Perl5的信息頁:
http://www.metronet.com/perlinfo/perl5.html
在Perl/Tk的腳本中‘=>'操作符時(shí)很常見的。perlop手冊(cè)頁中說:關(guān)系操作符=>只是逗號(hào)操作符的替代物,它在顯示成對(duì)的參數(shù)時(shí)非常有用。
你可以認(rèn)為=>只是為了程序的美觀和易維護(hù)而被使用的。請(qǐng)看,在下面的例子中,要想監(jiān)測是否每個(gè)選項(xiàng)都有對(duì)應(yīng)的值,是多么的困難:
$query -> Button(-in,/$reply,-side,'left',-padx,2m,-pady,
2m,-ipadx,2m,-ipady,1m)->pack(-side,'bottom');
而下面的這個(gè)則相反:
$query ->Button( -in => /$reply,
-side => 'left',
-padx => 2m,
-pady => 2m,
-ipadx => 2m,
-ipady => 1m
)->pack(-side => 'bottom');
順便說一下,如果你需要用數(shù)字“大于等于”的符號(hào),你應(yīng)該用“>=”而不是“=>”。
“::”符號(hào)可以認(rèn)為是與C語言中的“.”相似的,而它更像C++中的::類范圍操作符。
a.b.c; /* C語言中的 */
a::b::c(); // C++ 中的函數(shù)
$a::b::c; # Perl 5中的標(biāo)量
@a::b::c; # Perl 5中的列表
%a::b::c; # Perl 5中的關(guān)聯(lián)數(shù)組(或叫hash)
&a::b::c; # Perl 5中的函數(shù)
另外,Perl4中的單撇號(hào)也具有相同的功能:
$main'foo; # Perl 4中的標(biāo)量$foo
$main::foo; # Perl 5中的標(biāo)量$foo
出于向后兼容的考慮,Perl5也運(yùn)行使用$main'foo,但是仍推薦使用$main::foo。
版權(quán)聲明:本站文章來源標(biāo)注為YINGSOO的內(nèi)容版權(quán)均為本站所有,歡迎引用、轉(zhuǎn)載,請(qǐng)保持原文完整并注明來源及原文鏈接。禁止復(fù)制或仿造本網(wǎng)站,禁止在非www.sddonglingsh.com所屬的服務(wù)器上建立鏡像,否則將依法追究法律責(zé)任。本站部分內(nèi)容來源于網(wǎng)友推薦、互聯(lián)網(wǎng)收集整理而來,僅供學(xué)習(xí)參考,不代表本站立場,如有內(nèi)容涉嫌侵權(quán),請(qǐng)聯(lián)系alex-e#qq.com處理。