Help for this page

Select Code to Download


  1. or download this
    # USING LOOPS (not gonna work right)
    my(@directives) = qw/
    ...
    
    sub where { shift @directives }
    sub go { print @_ }
    
  2. or download this
    
    # USING SUBS TO EMULATE LOOP ITERATIONS
    ...
    
    go(@directives); # "go up, go down, go right, left, etc...