Help for this page
use strict; use warnings; my @FieldNames = ... ; print join ':', shift(@FieldNames), join ',', @FieldNames;