From owner-FreeBSD-users-jp@jp.FreeBSD.org Fri Aug 23 12:11:23 2002
Received: (from daemon@localhost)
	by castle.jp.FreeBSD.org (8.11.6+3.4W/8.11.3) id g7N3BNT19458;
	Fri, 23 Aug 2002 12:11:23 +0900 (JST)
	(envelope-from owner-FreeBSD-users-jp@jp.FreeBSD.org)
Received: from nagato-gw.x.inetd.co.jp (xdsl052136.211015.metallic.ne.jp [211.15.52.136])
	by castle.jp.FreeBSD.org (8.11.6+3.4W/8.11.3) with ESMTP/inet id g7N3BM319446
	for <FreeBSD-users-jp@jp.FreeBSD.org>; Fri, 23 Aug 2002 12:11:22 +0900 (JST)
	(envelope-from zensyo@inetd.co.jp)
Received: from localhost by nagato-gw.x.inetd.co.jp (8.11.3/3.7W01112022) id g7N3BLX65877; Fri, 23 Aug 2002 12:11:21 +0900 (JST)
To: FreeBSD-users-jp@jp.FreeBSD.org
From: zensyo@ann.tama.kawasaki.jp
In-Reply-To: <20020822.175438.893828799.takachan@running-dog.net>
References: <002301c2498f$a9a97040$43d8153d@urawa1.kt.home.ne.jp>
	<20020822.175438.893828799.takachan@running-dog.net>
X-Mailer: Mew version 1.94.2 on Emacs 19.34 / Mule 2.3 (SUETSUMUHANA)
Mime-Version: 1.0
Content-Type: Text/Plain; charset=iso-2022-jp
Content-Transfer-Encoding: 7bit
Message-Id: <20020823121120W.zensyo@inetd.co.jp>
X-Dispatcher: imput version 20000228(IM140)
Lines: 36
Reply-To: FreeBSD-users-jp@jp.FreeBSD.org
Precedence: list
Date: Fri, 23 Aug 2002 12:11:20 +0900
X-Sequence: FreeBSD-users-jp 70414
Subject: [FreeBSD-users-jp 70414] Re: =?ISO-2022-JP?B?GyRCTDU/TRsoQg==?=
 =?ISO-2022-JP?B?GyRCRGpFQDRRQiwbKEI=?= 
Errors-To: owner-FreeBSD-users-jp@jp.FreeBSD.org
Sender: owner-FreeBSD-users-jp@jp.FreeBSD.org
X-Originator: zensyo@inetd.co.jp
X-Distribute: distribute version 2.1 (Alpha) patchlevel 24e+020820

$BNkLZ!w(BANN-NET$B$G$9!#(B

Creative$B$N(BWEBCAM (OLUS$B$+$J!)(B)$B$r;H$C$F$$$^$9!#(B
$B2rA|EY$O$?$$$7$?$3$H$J$$$G$9$,!"$3$s$J(BCGI$B$r;H$C$F(BWEB$B$+$i%"%/%;%9$G$-$k(B
$B$h$&$K$7$F$$$^$9!#(B
$B!J;d$N4i$,8+$($k$@$1$J$N$G(BURL$B$O4*J[$7$F$/$@$5$$!K(B

FreeBSD-4.3$B$N%^%7%s$K(BUSB$B$N(BWEBCAM$B$rD>7k$7$F(B vid (posts/graphics/vid)$B$G(B
$B2hA|$r<hF@$7$F$$$^$9!#(Bvid$B$G$OB>$K$b2?5!<o$+$KBP1~$7$F$$$k$h$&$G$9!#(B

-----------------------------------------------------------------
#! /usr/bin/perl

# $BCQ$:$+$7$$$N$G<L$5$l$kA0$K%Y%k$r(B5$B2sLD$i$7$F(B3$BICBT$A$^$9(B
system("/usr/local/sbin/bell 5 ttyv0");  
sleep 3;

# ports/graphics/vid $B$H(B netpbm (?)
system("/usr/local/bin/vid --small | /usr/local/bin/pnmtopng -compression 9 -interlace -downscale 2>/dev/null > webcam.png");

print <<EOD;
Content-type: text/html;

<HEAD>
<META HTTP-EQUIV="Refresh" CONTENT=180>
<TITLE>Inetd Office</TITLE>
</HEAD>

<BODY>
3$BJ,$4$H$K<+F099?7$5$l$^$9!#%j%m!<%I$9$k$HB(;~$K99?7$5$l$^$9!#(B
<BR>
<HR>
<IMG SRC="webcam.png"><BR>
</BODY>
EOD
-----------------------------------------------------------------
