Help for this page

Select Code to Download


  1. or download this
     switch ($j) {
    
  2. or download this
    foreach my $j (0..$i-1) {
        my $idx = $j; # make a copy
        my $SUB = "${idx}Textfield_MaxText";
        *$SUB = sub { variableMaxText( $idx );
    };