ผลต่างระหว่างรุ่นของ "ผู้ใช้:Ans/script"
เนื้อหาที่ลบ เนื้อหาที่เพิ่ม
+partial wget output |
+partial wget output |
||
บรรทัด 393:
https://www.thairath.co.th/content/381873 not shift 100 ; <title>errorเมนู</title>
https://www.thairath.co.th/content/381872 not shift 100 ; <title>errorเมนู</title>
</source>
** $ <source lang=bash>set -- https://www.thairath.co.th/content/38{1899..0000} ; while (( $# > 0 )) ; do echo "$1" | grep '00$' ; { wget -t1 -qO- "$1" || echo '<title>errorเมนู</title>' ; } | grep -m1 -i -o '<title>.*<.......' | grep -m1 -i -o '<title>.*เมนู[^<]*<.......' | perl -ple 'BEGIN{$u=pop@ARGV;$|=1}s?\A<title>.*error? not shift 100 ; $&?i or$e=1; END{exit$e} $_="$u $_"' -- "$1" || shift 99 ; shift ; done ; echo done</source>
*** output: <source lang=text>
https://www.thairath.co.th/content/381898 not shift 100 ; <title>errorเมนู</title>
https://www.thairath.co.th/content/381852 <title>เมนูทีวี 11/11/56</title>
https://www.thairath.co.th/content/381700
https://www.thairath.co.th/content/381679 <title>เมนูทีวี 10/11/56</title>
https://www.thairath.co.th/content/381553 not shift 100 ; <title>errorเมนู</title>
https://www.thairath.co.th/content/381531 <title>เมนูทีวี 09/11/56</title>
https://www.thairath.co.th/content/381400
https://www.thairath.co.th/content/381339 not shift 100 ; <title>errorเมนู</title>
https://www.thairath.co.th/content/381300
https://www.thairath.co.th/content/381294 not shift 100 ; <title>errorเมนู</title>
https://www.thairath.co.th/content/381200
https://www.thairath.co.th/content/381200 <title>เมนูทีวี 08/11/56</title>
https://www.thairath.co.th/content/381100
</source>
** $ <source lang=bash>set -- https://www.thairath.co.th/content/38{1199..0000} ; while (( $# > 0 )) ; do echo "$1" | grep '00$' ; { wget -t1 -qO- "$1" || echo '<title>errorเมนู</title>' ; } | grep -m1 -i -o '<title>.*<.......' | grep -m1 -i -o '<title>.*เมนู[^<]*<.......' | perl -ple 'BEGIN{$u=pop@ARGV;$|=1}s?\A<title>.*error? not shift 100 ; $&?i or$e=1; END{exit$e} $_="$u $_"' -- "$1" || shift 99 ; shift ; done ; echo done</source>
*** output: <source lang=text>
https://www.thairath.co.th/content/381116 not shift 100 ; <title>errorเมนู</title>
https://www.thairath.co.th/content/381100
https://www.thairath.co.th/content/381033 <title>เมนูทีวี 07/11/56</title>
https://www.thairath.co.th/content/380911 not shift 100 ; <title>errorเมนู</title>
https://www.thairath.co.th/content/380900
https://www.thairath.co.th/content/380866 not shift 100 ; <title>errorเมนู</title>
https://www.thairath.co.th/content/380800
https://www.thairath.co.th/content/380792 not shift 100 ; <title>errorเมนู</title>
https://www.thairath.co.th/content/380783 not shift 100 ; <title>errorเมนู</title>
https://www.thairath.co.th/content/380782 <title>เมนูทีวี 06/11/56</title>
</source>
** $ <source lang=bash>set -- https://www.thairath.co.th/content/38{0799..0000} ; while (( $# > 0 )) ; do echo "$1" | grep '00$' ; { wget -t1 -qO- "$1" || echo '<title>errorเมนู</title>' ; } | grep -m1 -i -o '<title>.*<.......' | grep -m1 -i -o '<title>.*เมนู[^<]*<.......' | perl -ple 'BEGIN{$u=pop@ARGV;$|=1}s?\A<title>.*error? not shift 100 ; $&?i or$e=1; END{exit$e} $_="$u $_"' -- "$1" || shift 99 ; shift ; done ; echo done</source>
*** output: <source lang=text>
https://www.thairath.co.th/content/380792 not shift 100 ; <title>errorเมนู</title>
https://www.thairath.co.th/content/380783 not shift 100 ; <title>errorเมนู</title>
https://www.thairath.co.th/content/380782 <title>เมนูทีวี 06/11/56</title>
https://www.thairath.co.th/content/380647 <title>สคบ.ไล่บี้ร้านอาหารทำเมนูภาพ เหตุต่างชาติ "อิมเมจิ้น" จนตาลาย</title>
https://www.thairath.co.th/content/380541 <title>เมนูทีวี 05/11/56</title>
https://www.thairath.co.th/content/380404 not shift 100 ; <title>errorเมนู</title>
https://www.thairath.co.th/content/380400
https://www.thairath.co.th/content/380346 not shift 100 ; <title>errorเมนู</title>
https://www.thairath.co.th/content/380329 <title>เมนูทีวี 04/11/56</title>
https://www.thairath.co.th/content/380204 <title>เมนูทีวี 03/11/56</title>
https://www.thairath.co.th/content/380100
https://www.thairath.co.th/content/380073 <title>ตะลุยอังกฤษ ชิมเมนูเชฟมิชลิน</title>
https://www.thairath.co.th/content/380029 not shift 100 ; <title>errorเมนู</title>
https://www.thairath.co.th/content/380015 not shift 100 ; <title>errorเมนู</title>
https://www.thairath.co.th/content/380000
done
</source>
** $ <source lang=bash>set -- https://www.thairath.co.th/content/37{9999..0000} ; while (( $# > 0 )) ; do echo "$1" | grep '00$' ; { wget -t1 -qO- "$1" || echo '<title>errorเมนู</title>' ; } | grep -m1 -i -o '<title>.*<.......' | grep -m1 -i -o '<title>.*เมนู[^<]*<.......' | perl -ple 'BEGIN{$u=pop@ARGV;$|=1}s?\A<title>.*error? not shift 100 ; $&?i or$e=1; END{exit$e} $_="$u $_"' -- "$1" || shift 99 ; shift ; done ; echo done</source>
*** output: <source lang=text>
https://www.thairath.co.th/content/379994 not shift 100 ; <title>errorเมนู</title>
</source>
** $ <source lang=bash></source>
| |||