Help for this page

Select Code to Download


  1. or download this
    (my $label_colnum = &column_exists( \@data, $_[1] || 0 )) == -1 and di
+e;
(my   $key_colnum = &column_exists( \@data, $_[1] || 1 )) == -1 and di
+e;
(my $cross_colnum = &column_exists( \@data, $_[1] || 2 )) == -1 and di
+e;
# ...
  2. or download this
    do_A; do_B; do_C;
do_D;
...
do_A;
do_B;
...