I have tried the code belo

You have written

  -variable   => \$type,
  my $ent1 = $f1->Entry(-textvariable=>\$AssignMet);
  my $ent1 = $f1->Entry(-textvariable=>\$AssignTmy);
[download]

But \$type is not \$AssignMet is not \$AssignTmy --- at least two of those should be the same variable

I have also tried "bind" and "update" methods wihtout success.

Maybe show what you tried?