调整列表格式以便于维护

Perl允许你在列表最后一个元素末加上一个逗号,这样新增或删除元素时，都不必担心末尾逗号影响整个列表结构。临时注释某个元素时也很方便

my @cats = (

  'Buster Bean',

  'Mini',

  'Roscoe',

);

如果列表元素都不含空格，可以直接使用qw操作符初始化，这样逗号和引号都可以一并取消掉。

my @spacers = qw (

  husband Geroge

  wife        Jane

  daughter Judy

  son         Elory



);