Select Code to Download

#!/usr/bin/perl
use strict;
...
# close file:

close IN;

#!/usr/bin/perl
use strict;
...
while(my $line =<IN>){ ## reading a file line by line
  # here you need to put some regular expression to identify your web 
+addresses
}

www.1  5
www.2  7
www.3  2
...

#hey, what is my current count for www.2 ?
my $value = $hash{"www.2"};
print "$value\n"; # What does "\n" stand for?

#!/usr/bin/perl
use strict;
...
}