What am I doing wrong?

You're doing something that Tk::Scrolled+Tk::place don't like

If you want, this arrangement ought to be visible

my $frame    = ...
my $button   = $frame->...->place
my $scrolled = ...
$frame->pack( -in => $scrolled, ... );
[download]

Tk really mysterious sometimes, esp managers