Help for this page

Select Code to Download


  1. or download this
    @lines = <IN>;
    shuffle(@lines);
    ...
    # or if 'shuffle' returns the shuffled list
    
    print OUT shuffle(<IN>);
    
  2. or download this
    ($lines[param('from')], $lines[param('to')]) =
       ($lines[param('to')], $lines[param('from')]);