my $plot = $mw->Button(-text=>'Plot', -command=>\&init)
    ->pack(-side=>'left');