Lines Matching refs:txt
300 (my $txt = $url) =~ s@(.*/|\?.*)@@g;
311 report "Downloading $txt ...";
321 my @out = `curl -w %{response_code} $proto $quiet -o "$txt" "$url"`;
324 report "Downloaded $txt";
328 if(-e $txt && !unlink($txt)) {
329 report "Failed to remove '$txt': $!";
359 $resp = $ua->mirror($url, $txt);
366 report "Downloaded $txt";
371 exit 1 if -e $crt || ! -r $txt;
376 my $filedate = $resp ? $resp->last_modified : (stat($txt))[9];
385 my $newhash= sha256($txt);
389 if($opt_u && -e $txt && !unlink($txt)) {
390 report "Failed to remove $txt: $!\n";
429 report "Processing '$txt' ...";
442 open(TXT,"$txt") or die "Couldn't open $txt: $!\n";
655 close(TXT) or die "Couldn't close $txt: $!\n";
669 if($opt_u && -e $txt && !unlink($txt)) {
670 report "Failed to remove $txt: $!\n";