do { print "@ARGV\n"; } while( nextPermute(@ARGV) ); #### return if $i == -1; #### if( $i == -1 ) { $first= 1; return; }
## return if $i == -1; ##
## if( $i == -1 ) { $first= 1; return; }