Steve wrote: > Ok what would that look like as one line of perl? Must ... resist ... tempt ... ation ... Ah, bag it. perl -e 'sub i($){int rand$_[0]}$i=i(900)+100;while($i--){print join" ",map{i 65535*(i 2?-1:1)}0..i 1023;print"\n"}'