![](/img/trans.png)
[英]In perl is \*STDIN the same as STDIN?
我是Pythonizer的作者,我正在嘗試將 CGI.pm 的代碼從標准 perl 庫轉換為 Python。我在read_from_client中遇到了這段代碼: \*STDIN與STDIN是一回事嗎? 我不明白他們為什么這樣使用它。 謝謝你的幫助! 該模塊還引用\*main::STDIN - ...
[英]In perl is \*STDIN the same as STDIN?
我是Pythonizer的作者,我正在嘗試將 CGI.pm 的代碼從標准 perl 庫轉換為 Python。我在read_from_client中遇到了這段代碼: \*STDIN與STDIN是一回事嗎? 我不明白他們為什么這樣使用它。 謝謝你的幫助! 該模塊還引用\*main::STDIN - ...
[英]Redefine perl function using typeglob doesn't work as expected
這個例子工作正常: 這個也是: 但是如果我在typeglob中使用函數的全名它不起作用並嘗試讀取文件: 任何人都可以解釋為什么我不能通過完整的命名空間, File::Slurp::read_file重新定義子程序,並使用短名稱? 在對象方法的情況下,它工作正常: ...
[英]perl how to determine the type of a “raw symbol”
顯然,可以在標量變量中存儲“原始符號”(而不是對符號的引用),並在標量上下文中使用它。 如何確定標量值表達式是否是這些符號之一? 它們似乎字符串化為"*name_of_symbol"並且ref返回"" 。 但是, Data::Dumper也能夠確定它不是字符串並且在沒有引用的情況下 ...
[英]Why ref does not return 'GLOB'?
我想更好地理解typeglobs並編寫小程序: 輸出是: 為什么GLOB僅在最后一種情況下被返回? ...
[英]Perl: prototype in anonymous subroutine
我目前正在學習有關類型和名稱空間的Perls系統。 所以我寫了一個模塊,它接受一個常量的值和名稱兩個參數,並將常量輸出到調用者。 $ package變量等於caller [2]。 上面的代碼完成了將匿名子例程導出到調用者符號表中的工作。 因為我的目標是構建我自己的常量實現,子例程有 ...
[英]Debugging filehandles from perl open()
假裝我有這樣的東西(原諒糟糕的Perl風格-這是Someone Else的Perl。) 像update_status.pl foo這樣,它是通過命令行調用的。 我期望發生的事情:/var/config/foo/last_update.status包含當前時間戳。 實際發生的情 ...
[英]How can I prevent a sub being overwritten in Perl?
我正在使用遺留代碼,並且require一個定義子foo的.pl文件。 我的問題是在我的main:: namespace中已經存在另一個子foo ,稍后在我目前沒有處理的程序的一部分中調用它。 我需要的文件定義了sub foo {}因為很明顯它不希望foo在通常被調用的地方發生。 就我而 ...
[英]What is meant by proper closure here
這是Perl Cookbook直接推出的代碼: 它的目的是形成6個不同顏色名稱的子程序。 在解釋部分,該書內容如下: 這些函數看起來都是獨立的,但實際代碼實際上只編譯了一次。 這種技術節省了編譯時間和內存使用。 要創建正確的閉包,匿名子例程中的任何變量都必須是詞法。 這 ...
[英]Why is code in Net::SSL dereferencing typeglobs where I can't see the need?
Net::SSL是Crypt :: SSLeay的一部分。 雖然今天的bug報告工作,我被多少次可憐的老分心*露面。 例如,考慮Net::SSL::configure : 也許是因為我不熟悉5.8 Prel,但我無法確定在LHS上使用*是否有重要原因。 不僅僅是*$self-& ...
[英]In Perl, is there any difference between direct glob aliasing and aliasing via the stash?
在 Perl 中,以下兩個構造之間是否有任何區別: 和 它們似乎具有相同的 function (將*main::foo中的所有插槽別名為*main::bar中定義的插槽),但我只是想知道這種等效性是否始終成立。 ...
[英]How do I do the same thing as reference using typeglob in perl?
如何在 perl 中使用typeglob執行與引用相同的操作? perl 解釋$$ref{key}的確切步驟是什么? ...
[英]Why does this Perl produce “Not a CODE reference?”
我需要在運行時從Perl符號表中刪除一個方法。 我嘗試使用undef &Square::area執行此操作,這會刪除該功能但會留下一些痕跡。 具體來說,當調用$square->area() ,Perl會抱怨它是“不是CODE引用”而不是“Undefined subroutine ...
[英]perl: iterate over a typeglob
給定一個typeglob,我怎樣才能找到實際定義的類型? 在我的應用程序中,我們將PERL用作簡單的配置格式。 我想要()用戶配置文件,然后能夠看到定義了哪些變量,以及它們是什么類型。 代碼:(質量問題咨詢) my.config: 輸出: ...
[英]Reading another packages symbol table in Perl
我試圖從另一個包中讀取全局符號。 我將包名稱作為字符串。 我正在使用Symbol模塊中的qualify_to_ref 給我Not an ARRAY reference at ......我認為我得到了解除引用的格式錯誤。 這是一個完整的示例程序。 ...
[英]How can a Perl subroutine distinguish between file names, file handes, *DATA, and *STDIN?
如果我有一個可能傳遞文件名或各種文件句柄或typeglobs的函數,那么函數如何區分這些參數 - 包括告訴區別,例如*DATA和*STDIN ? 根據目前為止收到的答案更新了代碼謝謝大家。 ...
[英]What does *PIPER mean in Perl?
我需要一些幫助來理解以下Perl代碼段。 我有以下兩個問題。 1.本地*PIPER是什么意思? 即使我在local *語法之前完成了一些Perl編程,對我來說也是新的。 它是指針嗎? 2.目的是什么? 謝謝 :) ...