Stories
Slash Boxes
Comments
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
 Full
 Abbreviated
 Hidden
More | Login | Reply
Loading... please wait.
  • by chaoticset (2105) on 2003.06.16 12:09 (#21113) Homepage Journal
    He said it appears that one of the heads controls the front pair of legs and the other the back.

    # Maybe two heads will be better than one?

    my $left = new Head;
    my $right = new Head;

    # Default leg controls will cause collisions,
    # better to have averaged cross-control.

    my $rear = (Leg->new(), Leg->new());
    my $front = (Leg->new(), Leg->new());

    # That's too much work, I'll just stick in a
    # just a quick hack for now, will provide
    # averaged cross-control on next version

    $left{'legs'} = \$rear;
    $right{'legs'} = \$front;

    --

    ------------------------------
    You are what you think.