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

(^CN in irssi)

This commit is contained in:
unethical 2019-05-05 07:52:07 +00:00
parent da82749679
commit 8de9515bbe
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
tool/irssi_cf_alturl.pl
View File

@ -145,7 +145,7 @@ sub GotUrl {
## ACT1: Update URL if Cloudflared
if ( grep( /^$fqdn$/, @cached ) ) {
deb("$target Found in Cache $fqdn");
$mytype = '^B^K3[Archive^O] ';
$mytype = '^B^C3[Archive]^O ';
$myurl = 'https://web.archive.org/web/' . $myurl;
}
else {
@ -165,7 +165,7 @@ sub GotUrl {
if ( $ifoundit == 1 ) {
push( @cached, $fqdn );
$mytype = '^B^K3[Archive^O] ';
$mytype = '^B^C3[Archive]^O ';
$myurl = 'https://web.archive.org/web/' . $myurl;
}
}
@ -179,7 +179,7 @@ sub GotUrl {
$answer = $response->content;
if ( $answer eq '[true,true]' ) {
push( @cached, $fqdn );
$mytype = '^B^K3[Archive^O] ';
$mytype = '^B^C3[Archive]^O ';
$myurl = 'https://web.archive.org/web/' . $myurl;
}
}
@ -195,7 +195,7 @@ sub GotUrl {
$response = $browser->get($url);
$answer = $response->content;
if ( index( $answer, 'https://ux.nu/' ) == 0 ) {
$mytype = '^B^K7[Short^O] ';
$mytype = '^B^C7[Short]^O ';
$myurl = $answer;
}
}