PR
こあきんど
私は日記を長く続けた事が無いので、不定期に更新します。（読者の皆さん・・・はて！いるのかな？＝毎日は更新できないと思いますが、たまに立ち寄って見て下さい。その時、コメントを付けてもらうと嬉しいです。よろしくお願いします。）
カテゴリ
最新情報
(214)ブログ・アフィリエイト
(70)生活・イベント・情報
(150)芸能・音楽・趣味・旅
(91)政治・経済(社会一般)
(85)心に残った喜怒哀楽
(42)健康と医学
(138)PC・ネット・オークション
(167)ITセミナー
(3)フラッシュ・アニメGIF
(282)名言集(覚書)
(17)perl パール一年生
(14)MP3音源
(2)ソフト（アプリケーション）
(43)スカイプ Skype
(1)NPQまるちゃん探偵団
(6)EEEPCカスタマイズ
(1)まるちゃんの糖尿病闘病記
(9)広島障害者職業能力開発校事件
(50)宅建合格講座
(13)介護
(5)コメント新着
朝ドラ・・・風、薫る
New!
ロードバイク61さん
知識のアップデート New! 暑がりのミケネコさん
里山暮らし、ときど… rimin（リミン）さん
… ゆっくりくりさん
楽天市場 美容・コ… あずきゃりさん
まよまよ日記 まよまよ1023さん
しまミーコの「猫の… しまミーコさん
てくてく歩き hoshii.comさん
MARU&PAG ROOM iwasan2958さん
知識のアップデート New! 暑がりのミケネコさん
里山暮らし、ときど… rimin（リミン）さん
… ゆっくりくりさん
楽天市場 美容・コ… あずきゃりさん
まよまよ日記 まよまよ1023さん
しまミーコの「猫の… しまミーコさん
てくてく歩き hoshii.comさん
MARU&PAG ROOM iwasan2958さん
2007.06.28
カテゴリ： perl パール一年生
CGIランダムURLジャンプ
#CGIランダムURLジャンプ▲(c)p4room(http://p4room.mda.or.jp/)
@urls = ( #URLを配列に登録する
"http://www.goo.ne.jp/",
"http://www.yahoo.co.jp/",
"http://japan.infoseek.com/"
);
srand(time + $$); #乱数発生の準備
$n = int(rand($#urls + 1)); #乱数発生
print "Location: $urls[$n]\n\n"; #Locationを指定する
exit;
お気に入りの記事を「いいね！」で応援しよう
[perl パール一年生] カテゴリの最新記事
-
こあきんど掲示板設置 CGI 2007.09.17 コメント(4)
-
おじさんブログパーツ 2007.09.09 コメント(10)
なんじゃ、こりゃ？
ドレミファビアン
さん
ドレミファビアンさんへRe:なんじゃ、こりゃ？(06/28)
こあきんど
さん
【毎日開催】
15記事にいいね！で1ポイント
© Rakuten Group, Inc.
