質問編集履歴

2

がお

2017/08/06 11:08

投稿

hatsu
hatsu

score0

test CHANGED
File without changes
test CHANGED
@@ -169,3 +169,93 @@
169
169
  心当たりある方、わかる方是非ともご教授いただけますと大変嬉しいです。
170
170
 
171
171
  どうかよろしくお願いします。
172
+
173
+
174
+
175
+ ####追記\(解決しました\)
176
+
177
+ asahina1979様のご提案によりcurlを使って解決いたしました。
178
+
179
+ 今後ご覧になられる方の一つの方法として解決したコードを載せておきます。
180
+
181
+
182
+
183
+ ```php
184
+
185
+ <!DOCTYPE html>
186
+
187
+ <html lang="ja">
188
+
189
+ <head>
190
+
191
+ <meta charset="UTF-8">
192
+
193
+ <title></title>
194
+
195
+ </head>
196
+
197
+ <body>
198
+
199
+ <p>将棋ウォーズのツイートを読み込んでいくよ</p>
200
+
201
+ <\?php
202
+
203
+ \$url = "http://hoikids\.sakura\.ne\.jp/allwarstw_desplay/index\.php";
204
+
205
+ \$ch = curl_init\(\); // はじめ
206
+
207
+
208
+
209
+ //オプション
210
+
211
+ curl_setopt\(\$ch, CURLOPT_URL, \$url\);
212
+
213
+ curl_setopt\(\$ch, CURLOPT_RETURNTRANSFER, true\);
214
+
215
+ \$tw_kifu = curl_exec\(\$ch\);
216
+
217
+ \$pattern = "/https:\\/\\/t\.co\\/\[a-zA-Z0-9\]{10}/";
218
+
219
+ // while\( ! feof\( \$fp \) \){
220
+
221
+ // \$tw_kifu = fread\( \$fp, filesize\(\$filename\)\);
222
+
223
+ preg_match_all\(\$pattern, \$tw_kifu , \$matches\);
224
+
225
+ foreach\(\$matches\[0\] as \$value\){
226
+
227
+ \$twkifu_url = get_headers\(\$value, true\);
228
+
229
+ \$wars_url = \$twkifu_url\["location"\];
230
+
231
+ if\(strpos\(\$wars_url,'kif-pona\.heroz\.jp'\) !== false\){
232
+
233
+ if\(\$wars_url == \$pre_wars_url\){
234
+
235
+ continue;
236
+
237
+ };
238
+
239
+ file_put_contents\('twkifu_url\.txt', \$wars_url\."<br>"\."\\n", FILE_APPEND\);
240
+
241
+ echo \$wars_url\."<br>";
242
+
243
+ \$pre_wars_url = \$wars_url;
244
+
245
+ }
246
+
247
+ }
248
+
249
+ // }
250
+
251
+ // var_dump\(\$html\);
252
+
253
+ curl_close\(\$ch\); //終了
254
+
255
+ \?>
256
+
257
+ </body>
258
+
259
+ </html>
260
+
261
+ ```

1

解決しました。

2017/08/06 11:05

投稿

hatsu
hatsu

score0

test CHANGED
File without changes
test CHANGED
@@ -169,95 +169,3 @@
169
169
  心当たりある方、わかる方是非ともご教授いただけますと大変嬉しいです。
170
170
 
171
171
  どうかよろしくお願いします。
172
-
173
-
174
-
175
- ####追記\(解決しました\)
176
-
177
- asahina1979様のご提案によりcurlを使って解決いたしました。
178
-
179
- 今後ご覧になられる方の一つの方法として解決したコードを載せておきます。
180
-
181
-
182
-
183
- ```php
184
-
185
- <!DOCTYPE html>
186
-
187
- <html lang="ja">
188
-
189
- <head>
190
-
191
- <meta charset="UTF-8">
192
-
193
- <title></title>
194
-
195
- </head>
196
-
197
- <body>
198
-
199
- <p>将棋ウォーズのツイートを読み込んでいくよ</p>
200
-
201
- <\?php
202
-
203
- \$url = "http://hoikids\.sakura\.ne\.jp/allwarstw_desplay/index\.php";
204
-
205
- \$ch = curl_init\(\); // はじめ
206
-
207
-
208
-
209
- //オプション
210
-
211
- curl_setopt\(\$ch, CURLOPT_URL, \$url\);
212
-
213
- curl_setopt\(\$ch, CURLOPT_RETURNTRANSFER, true\);
214
-
215
- \$tw_kifu = curl_exec\(\$ch\);
216
-
217
- \$pattern = "/https:\\/\\/t\.co\\/\[a-zA-Z0-9\]{10}/";
218
-
219
- // while\( ! feof\( \$fp \) \){
220
-
221
- // \$tw_kifu = fread\( \$fp, filesize\(\$filename\)\);
222
-
223
- preg_match_all\(\$pattern, \$tw_kifu , \$matches\);
224
-
225
- foreach\(\$matches\[0\] as \$value\){
226
-
227
- \$twkifu_url = get_headers\(\$value, true\);
228
-
229
- \$wars_url = \$twkifu_url\["location"\];
230
-
231
- if\(strpos\(\$wars_url,'kif-pona\.heroz\.jp'\) !== false\){
232
-
233
- if\(\$wars_url == \$pre_wars_url\){
234
-
235
- continue;
236
-
237
- };
238
-
239
- file_put_contents\('twkifu_url\.txt', \$wars_url\."<br>"\."\\n", FILE_APPEND\);
240
-
241
- echo \$wars_url\."<br>";
242
-
243
- \$pre_wars_url = \$wars_url;
244
-
245
- }
246
-
247
- }
248
-
249
- // }
250
-
251
- // var_dump\(\$html\);
252
-
253
- curl_close\(\$ch\); //終了
254
-
255
- \?>
256
-
257
- </body>
258
-
259
- </html>
260
-
261
- ```
262
-
263
- !\[イメージ説明\]\(5baaf4283b015bb1b3f1fac709cafbd0\.png\)