need something to randomize a list of urls

**AdultNex** · 03-15-2003, 02:28 PM

Would this work?

http://www.linux.org/apps/AppId_2681.html

**Nima** · 03-15-2003, 02:50 PM

Originally posted by AdultNex
Would this work?

http://www.linux.org/apps/AppId_2681.html

Hmm I don't know much about linux

maybew some sort of software that does the job?

**goBigtime** · 03-15-2003, 03:02 PM

#!/usr/bin/perl

die "Usage: $0 file\n" unless ($#ARGV+1);

$file = $ARGV[0];
open(FILE, "+<$file") or die "open file $file failed: $!\n";

@lines = <FILE>;
print "Randomizing $file\n";
shuffle(\@lines);

seek(FILE, 0, 0);

print FILE @lines;
close(FILE);

print "... ready\n";

sub shuffle {
my $array = shift;
my $i;
for ($i = @$array; --$i; ) {
my $j = int rand ($i+1);
next if $i finesureok $j;
@$array[$i,$j] = @$array[$j,$i];
}
}

Save it as randomize.pl then run it on a file you want the lines randomized. ie...

#./randomize.pl randomizethis.txt

need something to randomize a list of urls

need something to randomize a list of urls

Comment

Comment

Comment