여러 문장을 Perl의 표현식에 결합 하시겠습니까?

Question

여러 개의 명령문을 하나의 표현식으로 결합 할 수 있습니까? 블록이이를 수행 할 수 있지만 표현식으로 패키지화 할 수 있는지 궁금합니다.

Answer 1

정확히 do BLOCK 님의 목적입니다. 예를 들어

,

my $file = do { 
    open(my $fh, '<', $qfn) or die $!; 
    local $/; 
    <$fh> 
};