my $lam_num_ent = $lam_mat_frm -> Entry(),
    -variable=> \$lam_num;