Don't choke on really big URLs.
git-svn-id: svn://10.0.0.236/trunk@28241 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
@@ -52,6 +52,9 @@ sub Flush {
|
||||
my $tick = 0;
|
||||
foreach my $name (keys %counts) {
|
||||
if ($tick++ % 100 == 0) {
|
||||
if ($tick <= 1) {
|
||||
print "\nAdding $date ";
|
||||
}
|
||||
print "+";
|
||||
}
|
||||
my $id = $ids{$name};
|
||||
@@ -98,6 +101,9 @@ while (<STDIN>) {
|
||||
|
||||
my ($day,$month,$year,$hours,$mins,$secs,$name) =
|
||||
($1, $2, $3, $4, $5, $6, $7);
|
||||
if (length($name) > 250) {
|
||||
$name = substr($name, 0, 250);
|
||||
}
|
||||
|
||||
my $date = "$month $day, $year";
|
||||
|
||||
|
||||
Reference in New Issue
Block a user