Select Code to Download

my $dataFrame = $cpWindow -> Frame;
    
foreach my $item ("Data1", "Data2") {
...
   $objects{"$lc_item\_available"} = "N";
   $frame -> pack(-side => "left");
}