namazu-ml(avocado)
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: check point
- From: Ken-ichi Hirose <hirose@xxxxxxxxxxxxxxxxxxxx>
- Date: Mon, 7 Dec 1998 08:54:07 +0900
- X-ml-name: namazu
- X-mail-count: 01717
広瀬と申します。
<satoru@xxxxxxxxxxxxx> wrote.
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
>>(4)
>>exec($^X, $0, @ARGV) という形で exec しているので、起動のしかたによっ
>>ては、これではまずい場合もあるかもしれません。
>Win32, OS/2 では正しく動くか不安です。
>
> #!/usr/bin/perl
> my $i = 0;
> $i = defined $ARGV[0] ? $ARGV[0] : 0;
> print "$$: $i\n";
> exec($^X, $0, ++$i);
>なるスクリプトで動作確認してもらえます? > 広瀬さん, 清水さん
perl は Perl for Win32 Build 316
で、以下のようになりました。
A:\tmp>perl selfexec.pl
-182099: 0
-1650395: 1
-180295: 2
-1647923: 3
-1661451: 4
-1643071: 5
-1648235: 6
-1644427: 7
-1644247: 8
-1639451: 9
-1645407: 10
-2015567: 11
-1650567: 12
-1643835: 13
-1647671: 14
-1663103: 15
-1692435: 16
-1664595: 17
-1664835: 18
-1669403: 19
A:\tmp>
ばっちり大丈夫みたいですね。
Best regards,
--
Ken-ichi Hirose (^^)k!
e-mail: hirose@xxxxxxxxxxxxxxxxxxxx