Select Code to Download

use constant {
    OBJECT => 0,
    ARG0 => 1,
    ARG1 => 2,
};

    my ($self, $body, $wheel_id) = @_[0, 1, 2];