cypherpunks/stop_cloudflare
cypherpunks
/
stop_cloudflare
mirror of https://git.openprivacy.ca/cypherpunks/stop_cloudflare
0
0
Fork 0
Code Issues Releases Activity

Update 'tool/irssi_cf_alturl.pl'

This commit is contained in:
unethical 2019-05-04 14:28:09 +00:00
parent 65506e84f7
commit 07285377b8
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
tool/irssi_cf_alturl.pl
View File

@ -132,8 +132,7 @@ sub GotUrl {
else { else {
deb("$target Asking API about $fqdn"); deb("$target Asking API about $fqdn");
$answer = ''; $answer = '';
$url = 'https://searxes.danwin1210.me/collab/open/ismitm.php?f=' $url = 'https://searxes.danwin1210.me/collab/open/ismitm.php?f='.$fqdn;
. $fqdn;
$browser = LWP::UserAgent->new; $browser = LWP::UserAgent->new;
$browser->agent("Mozilla/5.0 (Windows NT 6.1; rv:60.0) Gecko/20100101 Firefox/60.0"); $browser->agent("Mozilla/5.0 (Windows NT 6.1; rv:60.0) Gecko/20100101 Firefox/60.0");
$response = $browser->get($url); $response = $browser->get($url);
@ -173,6 +172,7 @@ sub GotUrl {
deb("$target process done for input $myurl"); deb("$target process done for input $myurl");
} }
## Cleanup cache
if ( $#cached > 500 ) { if ( $#cached > 500 ) {
@cached = (); @cached = ();
} }