Select Code to Download

$c->createGroup([0, 0], -members => [$parent, @children]);

    my $id = $c->find( 'withtag', 'current' );
    print "\t item id: $id\n";

    my $x1 = 10;
    my $x2 = 20;
...
    }

    my $group = $c->createGroup([0, 0], -members => [$parent, @childre
+n]);