【Perl】ニコニコ動画で投稿された動画をアカウント無しで見られる簡易プレーヤー【CGI】

暇だったので、作ってみた。
ニコニコ動画のアカウントが無くても、投稿された動画が見られるプログラムです。
このプログラムはPerlを使っているので、XAMPPという、サーバーアプリケーションで動作させるか、レンタルサーバーにうpしないと、動作しません。
また、あくまでも見るだけなので、コメント投稿などはできません。
以下、コード

#!/usr/local/bin/perl
my $Number = $ENV{'QUERY_STRING'};
print "Content-Type:text/html\n\n";
print <<"a";
<html lang="ja">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=shift-jis">
<script type="text/javascript">
<title>ニコニコ動画簡易プレーヤー</title>
</head>
<body>
<center><script type="text/javascript" src="http://ext.nicovideo.jp/thumb_watch/$Number"></script><noscript>視聴する場合は、<a href="http://get.adobe.com/jp/flashplayer/">Adobe Flash Playerをインストールしてください。</a></noscript><br><iframe width="312" height="176" src="http://ext.nicovideo.jp/thumb/$Number" scrolling="no" style="border:solid 1px #CCC;" frameborder="0"></iframe>
</center></body></html>
a
exit;
1;

以上
使い方(メモ帳を使用):

  • ↑のプログラムコード全てをメモ帳などにコピペする。
  • ファイル(F)をクリックして、名前を付けて保存(A)…をクリック。ファイルの種類(T):を「全てのファイル」にする。ファイル名は何でも構いませんが、ファイル名は英数字で、ファイル名の最後に必ず「.cgi」を付けること。保存をクリックすると、作成完了です。
  • CGI(Perl)が動作するレンタルサーバーにFTPなどでうpしてください(詳しいやり方は各サーバー事業者のFAQなどをご覧ください。)。
  • http://[URL]/[簡易プレーヤーのファイル名]?sm9(例:http://rail.west223.net/nikoniko/nikonikodouga.cgi?sm9)と入力すると、「新・豪血寺一族 -煩悩解放 – レッツゴー!陰陽師」のプレーヤーが表示される。再生ボタンを押すと、再生される。

動作サンプル:

  • 新・豪血寺一族 -煩悩解放 – レッツゴー!陰陽師
  • 【東方】Bad Apple!! PV【影絵】

動作するレンタルサーバー:

  • さくらインターネット
  • TOK2
  • @pages
  • XREAなど
FC2やYahoo!ジオシティーズなどでは動作しません。
作成環境:
秀丸エディタ Ver8.02(64bit)
nikonikodouga.png
動作:XAMPP 1.7.4、さくらインターネット

参考になった、おもしろいと思ったら、↓をクリック!
ブログランキング・にほんブログ村へにほんブログ村 高校生日記ブログ 男子高校生へにほんブログ村 高校生日記ブログへ

お知らせ

2014年以前の投稿のコメント欄は閉鎖させていただきました。
投稿についてのお問い合わせはこちらからお願いいたします。