$ perl -e 'use Tk; MainWindow->new()->Button(text => "?")->pack(-pady => 2); MainLoop'
unknown option "text" at /long/path/to/Tk/Widget.pm line 205.
 at -e line 1.