2
3643 '_compile_all' => <<'END_OF_FUNC',
3644 sub _compile_all {
3645 foreach (@_) {
3646 next if defined(&$_);
3647 $AUTOLOAD = "CGI::$_";
3648 _compile();
3649 }
3650 }
3651 END_OF_FUNC
3652
3653);
3654 END_OF_AUTOLOAD
3655 ;
END_OF_FUNC
和END_OF_AUTOLOAD
這是怎麼工作的?在CGI.pm裏,END_OF_FUNC這樣的東西是如何工作的?
它應該與';'分開,爲什麼','在這裏使用? – Learning
學習:就好像<<後面的行中的所有內容都是<<所在的字符串,但是您可以在第一行中包含其他內容,這些內容是插入的字符串之後的內容。你甚至可以在同一行上有多個<<。 – ysth
比較'print << TAG,「foo」;'和'print << TAG;'。或'print << TAG x 2;' – ysth