Help for this page

Select Code to Download


  1. or download this
    sub r  { $_[0] } # no-op?
    sub rr :lvalue { $_[0] } # no-op?
    ...
    
    $_ = 1;
    print rr(++$_) + rr(++$_)++;
    
  2. or download this
    use v5.16;
    no v5.17;
    ...
    
    $_ = 1;
    say ++rr(++$_) + ++rr(r(rr(++$_)++));