I think that a simple call to the select method of every checkbox will be enough. Something like:

 
sub select_all {
    my @cbxs = @_;

    for my $cb (@cbxs) {
        $cb->select( );
    }
}
[download]

"Mastering Perl/Tk" is a good reference, when you're dealing with Tk.