爲什麼Perl允許通過引用傳遞參數？

Question

我想知道爲什麼Perl有能力參照函數傳遞參數？ 我知道Python和Ruby都不具備這樣的功能。

Answer 1

將一件事與另一件區分開很有用。

（1）通過引用將參數傳遞給子程序。這在Perl中很有用，因爲語言將所有參數作爲未分化的值列表傳遞給子例程。例如，如果沒有通過引用傳遞數據結構的能力，那麼帶有兩個列表的函數的設計者將無法將這些列表分開。另外，如果數據結構很大，則通過引用來傳遞它們可以提供性能增益。

process_two_lists(@x, @y); # Can't distinguish the lists. 
process_two_lists(\@x, \@y); # Can. 

由於Python和Ruby的設計方式不同，因此它們在傳遞參數方面不需要這種區別。 Python或Ruby中的類似方法將接收兩個不同的參數（兩個對象，分別代表列表x和y）。

（2）Perl的行爲使@_作爲別名作爲傳遞參數，允許子例程修改調用者感知的數據。

sub add_ten_to_me { 
    $_[0] += 10; 
} 

my $x = 1; 
add_ten_to_me($x); 
say $x;   # 11 Amazing! 

Python和Ruby也可以做這種類型的東西;但是，有一些資格。 Python區分可變的和不可變的對象。如果您將可變的內容傳遞給Python方法（例如列表），該方法可以修改數據結構。因此，Python版本process_two_lists將能夠修改x和y。但是，接收不可變對象（例如整數）的函數不會。因此，一個直接的Python模擬add_ten_to_me將無法​​正常工作。 [我相信可能會對Ruby有類似的觀點，但我現在不太瞭解細節。]

Answer 2

通過引用傳遞參數可以顯着提高性能。

Answer 3

Perl爲您提供了選擇。我認爲這是TIMTOWTDI想法的一部分。這是一個靈活的方法，所以你可以做你需要的。如果你訪問參數爲$_[0]那麼它是同一個對象。如果你轉移它或將它複製到一個詞彙，它是有價值的。

所以想想這樣。大多數代碼是有價值的，但是當你需要的時候通過引用就可以了。