Changeset 14919 in josm for trunk/scripts
- Timestamp:
- 2019-03-23T16:25:06+01:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/scripts/TestHTTPS.pl
r14900 r14919 33 33 for my $e ($xpc->findnodes(".//j:*", $entry)) 34 34 { 35 if($e->textContent =~ /^http:\/\/(.*?)[\/ ]/)35 if($e->textContent =~ /^http:\/\/(.*?)[\/:]/) 36 36 { 37 37 my $u = $1; … … 72 72 } 73 73 } 74 if($line =~ /http:\/\/(.*?)[\/ ]/)74 if($line =~ /http:\/\/(.*?)[\/:]/) 75 75 { 76 76 $urls{$1}{$name}++;
Note:
See TracChangeset
for help on using the changeset viewer.