@metrics=`cat a.txt`; my %labels; @labels[ 0 .. $#metrics ] = @metrics; print $query->checkbox_group(-name=>'a', -values=> [ 0 .. $#metrics ], -labels=> \%labels, -columns=> 1),