As documented in the Tk::Wm pod:

$mw->maxisze($width,$height)

There's also a minsize method.