my $pageframe = $page1 -> Frame (-background => 'sky blue');
  $pageframe -> pack();
# ...
for(my $i = 0;$i < 4;$i++) {
    $pageframe->Checkbutton(-text=>$av_searches[$i], -font=>'{Bimini} 12 {bold}', -background=>'sky blue', 
-activebackground=>'sky blue', -variable=>\$value)->pack(-side=>'left');
  }