如何删除逗号分隔值中的空列?

How can I remove empty columns in comma-separated values?

我有一个变量。示例:

date= 56788,45677,56908,34462,,41278,68977,55532

在值 34462 之后有两个逗号,如何使用 Perl 删除那里多余的逗号。

使用替换将两个逗号替换为一个逗号:

#!/usr/bin/perl
use warnings;
use strict;

my $date = '56788,45677,56908,34462,,41278,68977,55532';
$date =~ s/,,/,/g;
print $date;