#  $MW->Label(-text=>"This line will cause a segfault") -> pack;