Help for this page

Select Code to Download


  1. or download this
    use feature qw( say refaliasing );
    no warnings qw( experimental::refaliasing );
    ...
    range();                 #  7  -
    
    say join ', ', @stack;   # ""
    
  2. or download this
    my $i = 4;               # $i  @stack
                             # --  -------
    ...
    range();                 #  7  4,5,6
    
    say join ', ', @stack;   # "4, 5, 6"