You need to tell the geometry manager how to arrange widgets. So minimally something like this:

$c->pack(-expand => 1, -fill => 'both');
[download]