Help for this page
(my $label_colnum = &column_exists( \@data, $_[1] || 0 )) == -1 and di +e;
my $second_value = defined $_[1] ? $_[1] : 0; my $label_column = &column_exists(\@data, $second_value); die if $label_column == -1;