$window->create("my main window");
$window->addbutton(somex, somey, somewidth, someheight, name, \&mysub);

sub mysub
{
  my $result = $window->openFileDialog(...);
  # error check
  open FH "$result" or die $!;
  # parsing file
  close FH;
}