Perlサブルーチンのラベルを使用するのが悪いと思われますか？

Question

Perlサブルーチン内のラベルを使用して、複数のループから壊れたり、更新された変数でいくつかの部分をやり直したりするのは非常に便利です。このコーディングスタイルはコミュニティによってどのように見られますか？サブルーチン内のラベルを使用しているのですか？

Answer 1

いいえ。あなたの記述目的とまったく同じですが、私はあまり使用されない言語の素晴らしい機能だと考えています。

一方、私は自分自身でラベルの使用を熟考すると、自分のコードが少しのリファクタリングを必要としているかどうか疑問に思います。

Answer 2

next、last、redoのラベルを使用するのは問題ありませんが、コード構造が最適かどうかを検討するためには一時停止する必要があります。私の経験では、これらの演算子を囲むループ以外で使用することはめったにありません（つまり、ラベルを使用する必要はありません）。

goto LABELを使用することは強くお勧めします。

Answer 3

通常、goto LABELを使用する理由はありません。例えば

：

my $i = 10; 
Label: 
# ... 
goto Label if --$i; 

がより良いように記述されています：

my $i = 10; 
{ 
    # ... 
    redo if --$i; 
} 

---

私はラベルの使用を考えることができる唯一の理由は、複数のループから抜け出すことですか外側のループを続行する。多くの場合

my $i = 10; 
OUTER: while(1){ 
    # ... 
    while(1){ 
    # ... 
    last OUTER unless --$i; 
    } 
} 

my $i = 10; 
OUTER: { 
    # ... 
    { 
    # ... 
    redo OUTER if --$i; 
    } 
}