Help for this page

Select Code to Download

Select or download this

for ($j = 1; $j < 7; $j++) {
        my $frame = $mf->Frame(-background => 'alice blue', -padx => 2
+0, -pady => 5)
                ->pack(-expand => 1, -fill => 'both', -side => 'top');
...
                        ->pack(-side => 'left');
                } #end for $i
        } # End for $j