my $i=$t;
        $bill_table->Button(-text=>'Submit',
                        -command=>sub{if ($checkboxvalue[$i] ==1){print $f}},
                        )->pack;