Difficult to give any specific help without knowing the format of your data file, but let's assume that you have a line with three pieces of data (url, name and hist count) separated by colons. You could then do something like this:

open(DATA, 'hits.dat') or die "Can't open hits.dat: $!\n";
my @pages;

push @pages, [split /:/] while <DATA>;

my @sorted = sort { $b[2] <=> $a[2] } @pages;
[download]

@sorted now contains a list of your pages sorted from highest to lowest hits. Each element contains a reference to an array. Each of these second level arrays contains three elements, the url, the name and the hit count. To display a certain subset of these, you'd need to have a parameter which tells you where in the list to start and you could then use splice to extract the pages that you need. Something like this perhaps:

my $start = param('start');
my $display = 20;

print map { "@$_\n" } splice @sorted, $start, $display);;
[download]

$i = 0;
open(DATA,"text.txt");
foreach $line (<DATA>) {
   @site1 = split " ", $line;
   $master[$i] = "$site1[0], $site1[1]";
}
sort @master;
print "1. $master[0]";
print "2. $master[1]";
print "3. $master[2]";
print "4. $master[3]";
print "5. $master[4]";
[download]

- p u n k k i d
"Reality is merely an illusion, albeit a very persistent one."
-Albert Einstein