remove anchor part, wget wont check them anyways

Raku · Jul 14, 2016 · 2842424 · 2842424
1 parent 8764651
commit 2842424
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/test-links.sh b/test-links.sh
@@ -1,3 +1,5 @@
 #!/bin/sh
 
+cut -d '#' -f 1 html/links.txt | sort | uniq > html/links.tmp
+mv html/links.tmp html/links.txt
 wget -O- -i html/links.txt -B https://docs.perl6.org --method=HEAD 2>&1 | perl -ne '$_ =~ s/(.+)\n$/$1 /; print $_' | grep -v '200 OK'