Неа, это запятая в основном неуместны и не имеет смысла.
Однако это не влияет на код, поскольку передаваемые параметры передаются как хэш, а хеш - это не что иное, как список пар значений ключа. Жир-запятая (хэш-ракета на других языках) =>
также можно рассматривать как простую запятую - это в основном для обозначения такой пары ключ-значение.
Вы также можете написать это:
GetOptions(
"display=s", \$display,
"input=s", \$input,
)
С вашей дополнительной запятой становится:
GetOptions(
"display=s", \$display,
"input=s", , \$input,
)
, который не изменяет список вообще, так как два или более запятых и/или ракеты просто обрабатывается perl как одна запятая.
@a = (1, 2, 3, , , 6 => 7, 6);
print join(",", @a), "\n";
1,2,3,6,7,6
Так что это не вредит, но поскольку это приводит к путанице, я рекомендую удалить его.
Вероятно, он случайно остался во время рефакторинга кода. – ikegami
** и ** это безобидно; дополнительные запятые в или в конце списков являются необязательными. – Massa