diff options
Diffstat (limited to 'perl-install/http.pm')
| -rw-r--r-- | perl-install/http.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/http.pm b/perl-install/http.pm index 14a33fd7e..6e522597a 100644 --- a/perl-install/http.pm +++ b/perl-install/http.pm @@ -30,7 +30,8 @@ sub getFile { "", ""); #- skip until empty line - my ($now, $last, $buf, $tmp) = 0; + my $now = 0; + my ($last, $buf, $tmp); my $read = sub { sysread($sock, $buf, 1) or die ''; $tmp .= $buf }; do { $last = $now; |