Help for this page

Select Code to Download

Select or download this

# your code is:
our $cb = $frame->new_ttk__button(-text => "Calculate"); 
our $filename = $cb->getOpenFile();

Select or download this

our $cb = $frame->new_ttk__button(
               -text => "Calculate",  
               -command => sub{ our $filename = $cb->getOpenFile(); }
                );