sub my_push (\@@) {
    my($array_ref, @list) = @_;
    ...