최종 쉼표에서는 Perl,목록

목록 항목에서는 Perl 프로그래밍 언어 분리 운영자와의 쉼표 ,. 여기에는 예입니다 를 만드는 코드 배열이는 3 요소:

▶ Run
#!/usr/bin/perl

my @arr = ('one', 'two', 'three');

펄서 반면,예를 들어,JSON 을 지정할 수 있습 끝에 쉼표의 목록입니다. 이 코드를 만듭니다 동일한 배열로에서 이전의 예:

▶ Run
#!/usr/bin/perl

my @arr = ('one', 'two', 'three',);

이 배열의 세 가지 구성 요소입니다. 는 사실에 거기서 끝나는 소수점은 아무 효과가 없습니다. 당신 하는 것입니다 그 존재의 쉼표의 끝 부분에 목록을 추가 undef 마지막으로 값 없지만,, 이 일이되지 않습니다. 이 있는 경우 쉼표에 목록의 끝나지 않는 방식에 영향을 미치지 않습 Perl interpreterpath 이 목록입니다.

추천

Perl 프로그래밍 언어이 있는 목록에서 마지막 쉼표 또는 않지만,프로그램 기록하지만 이해하는 Perl,지하기 위해서 이해할 수 있는 사람들. 따라서,다음과 같은 추천 당신이 그것을 따르는 경우,코드가 좀 더 쉽게 읽고 좀 더 쉽게 변경합니다.

추천 다음과 같다:

  • 목록에 기록된 문자열로,최종 쉼표지
  • 면 서 목록 항목에 작성된 별도의 라인 한 후,마지막 요소의 쉼표

이 권장 사항은 다음과 같이

  • 는 경우 프로세스 목록에 변경이 사용하는 서면에서 한 줄에 의해 기록되었 값을 문자열에 다음을 추가해야 합 뒤에 쉼표
  • 과하는 경우 여러 목록에 목록을 만드에서 하나인 최종 쉼표를 제거하는 데 필요한

다음 예제 코드는 준수 이 권장 사항:

▶ Run
#!/usr/bin/perl

my @arr1 = ('one', 'two', 'three');

my @arr2 = (
    'one',
    'two',
    'three',
);

my %h = (
    a => 1,
    b => 2,
);

는 경우 목록의 각 요소에 기록되는 라인이 있는 것은 물론 쉼표와야 할 또 다른 요소를 추가 의 끝에서 목록,그런 차이점으로 구성됩니다 하나의 원인이고 두 개 추가되:

diff --git a/script.pl b/script.pl
index 5634af0..eabe2f1 100644
--- a/script.pl
+++ b/script.pl
@@ -3,5 +3,6 @@
 my @arr = (
     'one',
     'two',
-    'three'
+    'three',
+    'four'
 );

면 추천입니다 관찰하고의 끝에서 이 목록은 최종 쉼표,diff 로 구성되어 있 취소 라인:

diff --git a/script.pl b/script.pl
index 8575677..82b3adf 100644
--- a/script.pl
+++ b/script.pl
@@ -4,4 +4,5 @@ my @arr = (
     'one',
     'two',
     'three',
+    'four',
 );

다른 기사