my $note = $main->NoteBook(-dynamicgeometry => 'true')->pack();