如何編寫能夠識別上下文的函數(shù)?

perlish

perl的很多內(nèi)置函數(shù)根據(jù)標(biāo)量上下文或者列表上下文返回不同的值，我想知道用戶自己編寫的函數(shù)如何也具備這樣的能力，例如希望實現(xiàn)如下功能的函數(shù)：

1、在標(biāo)量環(huán)境中，返回字符串"abc"
2、在列表環(huán)境中，返回字符串?dāng)?shù)組("a", "b", "c")
代碼如下：

1. 
   
2. sub context
   
3. {
   
4.        ....
   
5. }
   
6. 
   
7. $scale = &context();  # $scale的值為"abc"
   
8. ($a, $b, $c) = &context(); # $a == "a", $b == "b", $c == "c"
   

復(fù)制代碼

謝謝解惑！

cobrawgl

http://72891.cn/thread-1213772-1-3.html

perlish

wantarray，學(xué)習(xí)了，謝謝！