my $bigbutton = Wx::Button->new( $frame, 1, 'Выполнить расчет', [-1,-1], [-1,-1]);
my $mass_label = Wx::StaticText->new($frame, 2, 'Ваш вес:',[-1,-1], [-1,-1]);
my $drink_label = Wx::StaticText->new($frame, 4, 'Предпочитаемый напиток:',[-1,-1], [-1,-1]);
my $mass_entry = Wx::TextCtrl->new($frame, 3, '',[-1,-1], [-1,-1]);