END是 Perl 在程式開始和結束時執行的五個程式碼塊之一。它建立了一個在 Perl 直譯器停止執行之前執行的塊。此塊甚至在 die 操作之後執行，但在exec或被 OS 訊號殺死時不執行。
雖然它可以加上sub字首，但這不被認為是良好的程式設計實踐，因為這些塊不是子例程。
END BLOCK
