12345678 #!/usr/bin/perluse strict;use warnings;use Filter::CommaEquals;my @array = (42, 1138, 96);@array ,= 433;print join(', ', @array), "\n";
#!/usr/bin/perl
use
strict;
warnings;
Filter::CommaEquals;
my
@array
= (42, 1138, 96);
,= 433;
print
join
(
', '
,
),
"\n"
;