Perlモジュールについて
■ このスレッドは過去ログ倉庫に格納されています
0001名無しさん＠お腹いっぱい。
2001/08/15(水) 07:47ID:???モジュールの使い方とかリンクは>>2-10さんが出してくれるかも？！
0266nobodyさん
04/02/18 23:24ID:???ログインファイルはログイン時に参照されるので、
ログインしないと設定されないと思います。
PERL5LIBにパス入れたらuse libは必要ないよ。
多分、まだ何かおかしい。
0268257
04/02/19 01:38ID:8y6GewN9そうです。
そうか、そういうことなんですね。
CGIで設定が効いてないのはbashでログインしてないから。
>>267
つまり、bashから起動するperlスクリプトにはuse libは必要ないはず、と。
なんだかなぞが解けてきました。
明日bashからやってみます。
0269nobodyさん
04/03/04 07:39ID:yHD/tZ44use Image::Magick;
$i = Image::Magick->new;
$i->Set(size=>"200x200");
これだけだと問題なくスクリプトは終了するんですが、
$i->ReadImage("xc:black");
これを付け足すと
perl: constitute.c:2015: ReadImage: Assertion `image_info->signature == 0xabacadab' failed.
apacheのエラーログにこう書き込まれ終了します。
どなたか解決方法わかる方見えましたら、
ご教示願います。
0271269
04/03/04 22:27ID:yHD/tZ44レスありがとうございます。
インストールしたバージョンは5.5.7-10です。
グーグルで探してもうまくヒットせず、どこを参考にしていいか…
やっぱり単純にバージョンを落としたほうがいいのでしょうか？
0272nobodyさん
04/03/05 11:42ID:???ReadImage()メソッドの引数、呼び出しのタイミングは絶対合ってる？
0273nobodyさん
04/03/05 16:05ID:EtQqgjUIしかし、perldoc DBIを行うと、 No documentation found for "DBI".
と表示されてしまいます。
DBI.pm、Pg.pmのディレクトリまで移動して、perldoc DBI
を行うと、マニュアルが表示されます。
どうやれば直せるのでしょうか？
なお、インストールの場所は自分で指定する方法で行いました。
0274269
04/03/05 19:53ID:???#!/usr/local/bin/perl
use Image::Magick;
$i = Image::Magick->new;
$i->Set(size=>"200x200");
$i->ReadImage("xc:black");
print "Content-type: text/html\n\n";
print "<html><head><title>Check</title></ead><body>";
print "<p>Ok</p>";
print "</body></html>";
exit;
今回上記のようにテストしたんですが、同じエラーでます。
もしかして根本的に書き方間違ってるでしょうか…
0275ヽ(´ー`)ノ
04/03/06 14:02ID:???man perldoc
>>274
古いバージョンも入ってて、そっちが使われてたりとか。
$Image::Magick::VERSION はチャンと 5.5.7 になってる？
あと、コンソールから convert -size 200x200 xc:black して、
キチンと動くかどうか確認してみれ。
0276ヽ(´ー`)ノ
04/03/06 14:04ID:???convert -size 200x200 xc:black test.png だ。
これで、
use Image::Magick;
$i = Image::Magick->new;
$i->Set(size => '200x200');
$i->ReadImage('xc:black');
$i->Write('png:test.png');
と同じ事ができるから、これがキチンと動けば Image::Magick.pm の、
動かなかったら libmagick 自体の問題。
0277269
04/03/06 23:13ID:???ごめんなさい、勘違いしてました。
インストールしたのはPerlMagick-5.56.tar.gzでした。
$Image::Magick::VERSION の結果は5.56で問題ないと思います。
それで
convert -size 200x200 xc:black test.png
だと問題なくtest.pngが作成されました。
use Image::Magick;
$i = Image::Magick->new;
$i->Set(size => '200x200');
$i->ReadImage('xc:black');
$i->Write('png:test.png');
だとエラー。
ってことはImage::Magick.pmの問題なんですね。
としたら…どうすればいいんだろう…
がんばって調べてみます。
解決方法が見つかればいいんだけど…
0279269
04/03/07 01:32ID:???perl: constitute.c:2015: ReadImage: Assertion `image_info->signature == 0xabacadab' failed.
下のスクリプトをbashで走らせると↑なメッセージが出ます。
ブラウザでは知らせれば500エラーでます。
もうわけがわからなくなってきた…
#!/usr/local/bin/perl
use Image::Magick;
$i = Image::Magick->new;
$i->Set(size => '200x200');
$i->ReadImage('xc:black');
$i->Write('png:testw.png');
print $Image::Magick::VERSION."\n";
exit
0280nobodyさん
04/03/07 05:54ID:???手元にWinしかなかったけどそのコードでもコマンドプロンプトから作成できた。
convert -size 200x200 xc:black test.png でもOK。
エラーになるかどうかはOSが違うから参考にはならないかもしれないけど。
ところでブラウザではそのままじゃ無理。
#!/usr/local/bin/perl
use Image::Magick;
print ("Content-type: image/png\n\n"); ←
binmode STDOUT; ←
$i = Image::Magick->new;
$i->Set(size => '200x200');
$i->ReadImage('xc:black');
$i->Write('png:-'); ←
exit;
0281269
04/03/07 06:05ID:???手元のWinにApacheなど放り込んで試してみましたが、
Winな環境だとうまくいきます。
Linuxと言うかRH7.2ベースのサーバだとうまく稼動しない。
$I->Set(size => '200x200');
まではうまくいくんだけど、ReadやらWriteやらがうまくいかない…
何でだろうと一晩中Webで探してもblog関係のしかヒットしないし、こうなればどっかにお金払ってでも頼むしか無いかなぁとか思いつつ。
あとスクリプト修正ありがとうございます。
面倒なのでbashで見る為だけにかいたのでブラウザは無視してました。
Content-typeやらbinmodeでの標準出力やらしなければだめでしたね。
失敗失敗…
0282nobodyさん
04/03/07 08:47ID:???0283nobodyさん
04/03/07 23:10ID:???0284nobodyさん
04/03/07 23:44ID:???0285nobodyさん
04/03/08 01:00ID:???0286nobodyさん
04/03/08 23:07ID:???0287nobodyさん
04/03/09 11:35ID:???Mail::Sendmailが定番ですか？
0288nobodyさん
04/03/09 12:34ID:???0289nobodyさん
04/03/09 12:37ID:???sendmail 入ってなかったら困るよなぁ。
0292290
04/03/09 14:32ID:???> >>290
> そうじゃなくて、将来、sendmailの無い環境で動かすようになる可能性を
> 示唆してるのだと思うけど。
>
ああ、なるほど。
とりあえず自分が使うんでない環境になたら別の手立てを考えますけど、
それとも、それならNet::SMTPとかに最初からしておくべき、って事でしょうか？
0293ヽ(´ー`)ノ
04/03/09 14:48ID:???0294nobodyさん
04/03/10 16:05ID:???使いたければ使っても良いんじゃないの。
CPANに登録したいとか言うのなら英語の方が良いと思うが。
0296nobodyさん
04/03/11 06:42ID:???0297nobodyさん
04/03/11 06:45ID:???0298遙皇 ◆HEHARUKAoo
04/03/14 21:53ID:MDuAbN5EG/GA/GAAS/libwww-perl-5.76.tar.gzとかｲﾝｽｺしようとすると
HTML::Parserでｺｹますが
これってこういうものですか？
0299nobodyさん
04/03/15 01:54ID:???Perl のバージョンあげた後、入れるの忘れてたからついでに入れてみたけど問題なく入ったべ。
これ以上は何て言われてこけてるのかわからないとなんとも。
0300遙皇 ◆HEHARUKAoo
04/03/15 02:58ID:???こりゃどーもすまんです。
perl.hとかperlvars.hで氏ぬほどsyntax errorが出てるのですが
In file included from /usr/lib/perl5/5.8.2/cygwin-thread-multi-64int/CORE/perl.h:2349,
from Parser.xs:19:
/usr/lib/perl5/5.8.2/cygwin-thread-multi-64int/CORE/scope.h:221: error: syntax error before "sigjmp_buf"
/usr/lib/perl5/5.8.2/cygwin-thread-multi-64int/CORE/scope.h:221: warning: no semicolon at end of struct or union
/usr/lib/perl5/5.8.2/cygwin-thread-multi-64int/CORE/scope.h:228: error: syntax error before '}' token
(Snip)
In file included from /usr/lib/perl5/5.8.2/cygwin-thread-multi-64int/CORE/perlapi.h:37,
from /usr/lib/perl5/5.8.2/cygwin-thread-multi-64int/CORE/XSUB.h:313,
from Parser.xs:20:
/usr/lib/perl5/5.8.2/cygwin-thread-multi-64int/CORE/perlvars.h:31: error: syntax error before '*' token
/usr/lib/perl5/5.8.2/cygwin-thread-multi-64int/CORE/perlvars.h:31: warning: data definition has no type or storage class
(Snip)
/usr/lib/perl5/5.8.2/cygwin-thread-multi-64int/CORE/perlvars.h:52: error: syntax error before '*' token
/usr/lib/perl5/5.8.2/cygwin-thread-multi-64int/CORE/perlvars.h:52: warning: data definition has no type or storage class
make: *** [Parser.o] Error 1
/bin/make.exe -j3 -- NOT OK
Running make test
Can't test without successful make
Running make install
make had returned bad status, install seems impossible
こんな感じです。
perl.hが悪いとか言われても（；´Д｀）
0301nobodyさん
04/03/15 13:27ID:???標準ライブラリヘッダってわけじゃないんだから、編集しても全然問題なし<perl.h
0302ヽ(´ー`)ノ ◆.ogCuANUcE
04/03/15 13:50ID:???原因をキチンと調べて、他に方法が無いにしか修正しない方がいいと思うけどね。
ググって同じような原因で悩んでいる人がいないのなら、大抵、自分の環境がおかしいから。
このモジュールの make は通っても、他のモジュールのコンパイルに影響を与える可能性もある。
cpan> look HTML::Parser
# perl Makefile.PL
# make > LOGFILE 2>&1
して、エラーメッセージの始めの方見せて欲しいかも。
パッと思い付くのは Perl が複数バージョン入ってて、ゴチャゴチャになってたり、
gcc が必要なヘッダを見付けられてないとかかねぇ。
あと、今から入れるんなら事情が無い限り 5.8.3 にした方がイイと思うが。
0303遙皇 ◆HEHARUKAoo
04/03/15 15:03ID:???まずmakeのメッセージの冒頭
(Snip, only cp *pm)
/bin/perl.exe /usr/lib/perl5/5.8.2/ExtUtils/xsubpp -typemap /usr/lib/perl5/5.8.2/ExtUtils/typemap -typemap typemap Parser.xs > Parser.xsc && mv Parser.xsc Parser.c
/bin/perl.exe mkhctype >hctype.h
/bin/perl.exe mkpfunc >pfunc.h
gcc -c -DPERL_USE_SAFE_PUTENV -fno-strict-aliasing -DUSEIMPORTLIB -O2 -DVERSION=\"3.35\" -DXS_VERSION=\"3.35\" "-I/usr/lib/perl5/5.8.2/cygwin-thread-multi-64int/CORE" -DMARKED_SECTION Parser.c
In file included from /usr/lib/perl5/5.8.2/cygwin-thread-multi-64int/CORE/perl.h:687,
from Parser.xs:19:
/usr/include/sys/times.h:11: error: conflicting types for `clock_t'
/usr/include/time.h:69: error: previous declaration of `clock_t'
こんな感じでコンフリクトから始まってます。
0304遙皇 ◆HEHARUKAoo
04/03/15 15:06ID:???In file included from /usr/include/asm/socket.h:14,
from /usr/include/cygwin/socket.h:23,
from /usr/include/sys/socket.h:15,
from /usr/lib/perl5/5.8.2/cygwin-thread-multi-64int/CORE/perl.h:709,
from Parser.xs:19:
/usr/include/cygwin/if.h:79: error: syntax error before "caddr_t"
/usr/include/cygwin/if.h:81: error: syntax error before '}' token
/usr/include/cygwin/if.h:82: error: syntax error before '}' token
ここまでif.h
0305遙皇 ◆HEHARUKAoo
04/03/15 15:08ID:???In file included from /usr/lib/perl5/5.8.2/cygwin-thread-multi-64int/CORE/perl.h:2071,
from Parser.xs:19:
/usr/include/pthread.h:72: error: syntax error before '*' token
(Snip)
/usr/include/pthread.h:135: error: `pthread_create' declared as function returning a function
/usr/include/pthread.h:135: error: syntax error before "void"
/usr/include/pthread.h:139: error: syntax error before "int"
/usr/include/pthread.h:141: error: syntax error before "void"
/usr/include/pthread.h:142: error: syntax error before '*' token
(Snip)
/usr/include/pthread.h:178: error: syntax error before ')' token
/usr/include/pthread.h:185: error: syntax error before "pthread_self"
/usr/include/pthread.h:188: error: syntax error before "int"
/usr/include/pthread.h:189: error: syntax error before "const"
ここまでpthread.hですがこれはヘッダが悪いかも
0306遙皇 ◆HEHARUKAoo
04/03/15 15:11ID:???・そもそもヘッダファイルが悪い
・threadsにPOSIX使うな
みたいな感じで解決策は思い浮かぶのですがそこから先がどうもダメです・・・
0307nobodyさん
04/03/15 15:22ID:???0308遙皇 ◆HEHARUKAoo
04/03/15 16:08ID:???環境を修正したらこっちは落ち着きました。
ただ、time.hとsys/times.hはダメですね。
0309遙皇 ◆HEHARUKAoo
04/03/15 18:33ID:???再ｲﾝｽｺします
0310遙皇 ◆HEHARUKAoo
04/03/19 12:35ID:???そもそも/lib/libc.aが見つかってなかった模様ですた。
0311nobodyさん
04/03/29 19:23ID:VhHocr2p$session = new CGI::Session("driver::File", undef, {Directory => $session_dir});
$sid = $session->id();
$session->param("aaa", "v_bbb");
のようにして、得たセッションIDをもとに次にアクセスするときにその
セッションIDをもとに
$session = new CGI::Session(undef, $sid, {Directory => $session_dir});
として、前のセッションのデータにアクセスしようとしたんですが、データを
引き継げてないようです。これは使い方が間違っているのでしょうか？
ぶっちゃけparamメソッドで入力したデータに二回目以降のアクセスで
取得できるようにするにはどのようにすればいいのでしょうか？
$session_dirに指定したファイル？もどこにあるかわからないし、、、
わからないことずくしです。
0312nobodyさん
04/03/30 02:28ID:???「データを引き継げていないようです」なんて投げやりな事を言わずに
とりあえず use strict したり、スクリプトのあちこちに print STDERR $hoge とかして
何がおこってるのか確認してみたらよいかと思うですよ。
0313おしえてたこらん
04/04/06 00:09ID:iAK4SXtb無料鯖で使いたいのでpmファイルをもってくれば使えるだけのがいいです!!
0315nobodyさん
04/04/07 08:42ID:???セッション管理で何がやりたいかによって違う。
単にSessionIDで連続したセッションである事を管理するだけならcookieを
使えばよい。セキュアでない単純なデータの保存もcookieで良い。
大量のデータを保存する場合は、Apache::SessionやCGI::Sessionが便利だが、
依存するモジュールが多いので単にpmを持ってくれば良いというものではない。
比較的簡単なのはWalrus::Session::Lite。
0316nobodyさん
04/04/07 11:57ID:uSQ3Xq7Vモジュールはありますでしょうか？
ぐぐってみたら File::Spec->rel2abs が見つかりましたが、" ../../ "の
ような指定が思った通りに変換できませんでした。
(Active Perl v5.6.1 Build 635@Win2000上で確認）
テストに使ったコード(test2.perl)
use File::Spec;
$abs_path = File::Spec->rel2abs( '../../temp/', 'c:/WINNT/system32/drivers/etc/' );
print $abs_path;
結果
C:\>perl test2.perl
C:\WINNT\system32\drivers\etc\..\..\temp
C:\WINNT\system32\temp に変換して欲しいのですが・・・
0317nobodyさん
04/04/07 13:12ID:???そのものズバリはしらない。
ちょっとカッコ悪いが下のスクリプトで同じような結果になる。
use Cwd;
my $cur_dir = Cwd::getcwd();
chdir '../../temp';
print Cwd::getcwd();
chdir $cur_dir;
0318nobodyさん
04/04/07 13:15ID:???shorten => while $abs_path =~ s|[^/\\]+[/\\]\.\.[/\\]||;
print $abs_path;
0319316
04/04/07 14:39ID:???>>318
318さんの方法を使う事にしました。ありがとうございました。
あと、スレ違いになってしまいますが 318さんのコードの中の
「shorten」は Perl 標準関数でしょうか？
ぐぐってみたのですが、正体が分かりませんでした。
0320nobodyさん
04/04/07 15:11ID:???=> 演算子を調べるべきだろう。
'縮めろ' while ... なり
1 while ... なり
while ($abs_path =~ ...) {} なりご自由に。
0324nobodyさん
04/04/09 12:53ID:???Unrecognized character \x8F at -e line 1.
(`Д´)ｵｯｼｬ
0325ヽ(´ー`)ノ ◆.ogCuANUcE
04/04/09 13:51ID:???$ perl -e "'笑点' => while 1;"
0326nobodyさん
04/04/17 22:56ID:???2､3見つかりますがどれも機械訳&途中までで使い物にならないです
もしあるのなら教えていただけませんでしょうか？
使ったスクリプト書いてwin上で動いてたのが
レン鯖で動いてくれなくて・・・
0327nobodyさん
04/04/17 23:32ID:???0328nobodyさん
04/04/17 23:41ID:???自分でちょっとづつ翻訳していってるのがローカルにあるよ
しかしあまりに時間がかかるしわからない英文もある。
本来のやりたい事と実際やってる事が激しく脱線してて
いやんなるんだよ
大体論点ずれてんだよ
これだけ一般的に使われてるモジュールが
なぜ翻訳されて無いのかと聞いてるんだろ
こんなに翻訳されてるのに http://perldoc.jp/
何でもかんでも
使いたいなら英語勉強しなってな風潮にうんざり
0329nobodyさん
04/04/17 23:43ID:???0330nobodyさん
04/04/17 23:45ID:???自分に合った環境が整っていないと切れる能無しのほうがうんざりするが。
0331nobodyさん
04/04/18 00:14ID:???翻訳したもの自分のサイトで晒してから言えって。
0332nobodyさん
04/04/18 05:17ID:Z8nwBIb4うだうだくっちゃべってる暇あったら早く翻訳しろカス
0333遙皇 ◆HEHARUKAoo
04/04/18 14:10ID:???0334nobodyさん
04/04/18 14:16ID:???APIが書いてあるだけだよね。APIを確認したいって話か？
それよか「動かない」ってどういうことなんだろう？
当人のスキルが判らなさすぎなんで、何ともいえなさすぎ。
0335nobodyさん
04/04/18 22:22ID:???$hoge->Write(filename=>'./hoge.gif',type=>'gif');
俺のローカル環境(win)ではこれで動いてたのが
レンタルのunix環境では動かなかった
$hoge->Write("gif:./hoge.gif");
こんな感じでいいんだな
あと、別にタイプ指定しなくても拡張子で判断して
ちゃんと圧縮方法選んでくれるようだ。
$hoge->Write("./hoge.gif");
0336nobodyさん
04/04/19 00:23ID:???0337nobodyさん
04/04/19 12:32ID:???0338nobodyさん
04/04/19 13:41ID:???0339nobodyさん
04/04/23 14:56ID:???すみませんがWindowsでのミリ秒の取得方法をご教授下さいＯＴＬ
Jperl 5.005_03 です。
標準入力に何秒かかったというコーディングって
むずかしいですかね？（´・ω・）
0340nobodyさん
04/04/23 17:14ID:???Bechmarkモジュールを使ってみました。
use Benchmark qw(:hireswallclock) ;
$t0 = new Benchmark;
print "何か入力して:";
$str = <STDIN>;
chomp $str;
$t1 = new Benchmark;
$td = timediff($t1, $t0);
print "たかが$strを入力するくらいで", (split(/\s/, timestr($td)))[0], "秒もかかるの？(ﾌﾟｯ\n";
ところで、特にJperlを使わなければいけない理由が無いなら、Encodeモジュールの
perldoc読んで、そろそろactiveperl 5.8.2に移行したほうがいいと思いますよ。
0341nobodyさん
04/04/23 20:20ID:???0342nobodyさん
04/04/23 20:39ID:???0343nobodyさん
04/04/24 01:12ID:???5.8.4だろ？
0345nobodyさん
04/04/26 10:16ID:???どうもありがとうです。
やってみたけどおいらの知識では（´・ω・）でした。素直に諦めます。
モジュールってどっかから落としてこないと駄目なんですよね？
Jperlにした意味は特にないです。たまたま見つけたので今まで使ってました。
近いうちにactiveperl入れてみたいとおもいます。
初心者丸出しすみません・・・ＯＴＬ
0346345
04/04/26 11:39ID:???うまくいきました！ ありがとうございました（`・ω・´)
0347nobodyさん
04/05/08 13:31ID:???a: 2 wallclock secs ( 2.02 usr + -0.01 sys = 2.01 CPU) @ 496770.99/s (n=1000000)
b: 3 wallclock secs ( 1.88 usr + 0.02 sys = 1.90 CPU) @ 525486.07/s (n=1000000)
wallclock secs が掛かった秒数で、
/s の値が一秒に何度実行したかの数だと思っていたのですが、
それだと時間がかかったほうの /s の値が大きいのは何故だろうと……。
あと usr と sys の意味もいまいち。
0348nobodyさん
04/05/08 14:45ID:???探してやったぞ。感謝しろ。
http://chaichan.hp.infoseek.co.jp/qa4000/qa4379.htm
0349nobodyさん
04/05/09 17:52ID:???感謝します。
#そのページの回答者にも
0350ヽ(´ー`)ノ ◆.ogCuANUcE
04/05/11 14:03ID:???0351nobodyさん
04/05/21 20:32ID:2dDSzz6yバーコードイメージ(PNG)をベクターデータに変換して
PDFに貼り付けたいのですが、
そんな処理はperlで可能でしょうか？
ちなみに環境は、Linux + perl5 です。
0352nobodyさん
04/05/23 02:46ID:???また難しい注文だな。
Perl のモジュールでそれができるものは見当たらないが、
Linux 上で動いて輪郭抽出を行うソフトとして autotrace てのがあって、
一応 PNG を食って (輪郭だけの) PDF を吐き出すことはできるらしい。
http://autotrace.sourceforge.net/
こいつを perl から呼び出せば、できんことは無いと思う。
ただ、すでにある PDF の上に輪郭を貼り付ける、というのは、
さらにもう一段階難しいと思われる。
0353nobodyさん
04/05/27 19:38ID:???その文字が表示された場合の横幅(ピクセル数とか)をゲットする
ということをやりたいのですが
そういうモジュールってありませんか?
フォントファイルはTrueType(TTC)ファイルで、
文字はASCIIだったり日本語だったりします。
0354nobodyさん
04/05/28 21:06ID:CmH5bJcK0355nobodyさん
04/05/28 21:07ID:CmH5bJcK0356nobodyさん
04/05/30 01:13ID:AsPEp7PVperl=/usr/local/perl…
のように定義されているファイルを教えて下さい。
旧バージョンの方が記述されてしまっているようで困っております。
0357nobodyさん
04/05/30 01:44ID:???0358nobodyさん
04/05/30 02:22ID:njFgOC0YHTML::Templateって、GPLですよね？
ってことは、GPLの
プログラムの全部あるいは一部を用いて作られたソフトウェアは
GPLに従って頒布されること
ってことで、HTML::Templateを利用した「ウェブアプリ自体」も、GPLに従い、
・必ずソースプログラムとともに頒布、複製される。もしソース
プログラムを付けずに配布する場合は、ソースプログラムを確
実に入手できる手段を提供することが義務付けられる
・ソフトウェアを使用、複製、変更、頒布したり、新しいフリー
ソフトウェアの一部として利用できることを認める
・GPLに従って頒布しなければならない
ってことになるんですかね？
0359nobodyさん
04/05/30 02:48ID:???Artistic License も選べるけどな。
http://search.cpan.org/src/SAMTREGAR/HTML-Template-2.6/README
http://opensource.jp/licenses/
http://home.catv.ne.jp/pp/ginoue/memo/gpl.html
0360358
04/05/30 03:48ID:???リンクありがとです。
Artistic License は仰る通りHTML::Templateのドキュメントにも
書いてあったのですが、よく分からないんですよね。この辺のライセン
ス関係の解釈って難しいので（単に私が馬鹿ばだけかもしれませんが）
リンク見てもググっても、結局得たい答えが見つかりませんでした。
早い話、HTML::Templateを一切改変せずそのまま「標準版」として
自作ウェブアプリの1ライブラリとして利用し、商用目的で配付する場
合、Artistic Licenseではどの様に扱われるかということなんです。
そもそもそういった商用目的での配付は無理なんですかね？可能でも
自作ウェブアプリのソースも公開し、配付と改変を認めないといけない
のですか？
それとも、ソースクローズドな形で配付できる方法もあるのでしょう
か？
0361nobodyさん
04/05/30 12:17ID:???|
| 8. Aggregation of this Package with a commercial distribution is always
| permitted provided that the use of this Package is embedded; that is,
| when no overt attempt is made to make this Package's interfaces visible
| to the end user of the commercial distribution. Such use shall not be
| construed as a distribution of this Package.
| ttp://opensource.jp/artistic/ja/Artistic-ja.html
| 8. このパッケージを商用配布と組みあわせるのは つねに許されています、
| もしこの 「パッケージ」の利用方法が埋めこみであれば、 すなわち、この「パッケージ」の
| インターフェイスが その商用配布のエンドユーザーに見えるように しようとするのでなければ。
| このような 利用方法はこのパッケージの配布と 解釈されません。
0362358
04/05/30 17:34ID:???単純明快なお答えに感謝です。まさに求めていた回答でした。
ただ、
ttp://opensource.jp/artistic/ja/Artistic-ja.html
は、359で張っていただいたリンクからたどれるものであり、自分も見ていたのです。なのに（今思えば睡魔が襲っていた
のでしょう）最初の段階で頭が混乱し、8.を見落としていました。全く情けない限りです。自分の怠慢であるにもかかわら
ずご丁寧に回答して下さったことに感謝です。
とても冗長な書き込みで申し訳ないのですが（書き込みを二回に分けます）、お付き合い下されば光栄です。
さて、このThe Artistic Licenseを自分なりに以下のように解釈しました。
1.実行環境の鯖にThe Artistic Licenseに基づくパッケージがインスコされていない場合、当該パッケージを自作アプリと一
緒に同梱して（圧縮とか）配布できる。その場合のパッケージは、「標準版」であればテキストファイルベースのPure Perl
で書かれたものであろうとその他の実行形式であっても構わない。その際、自作アプリのマニュアルに当該パッケージの
著作権表示・免責規定を記載する。
↑The Artistic Licenseの1.より
2.但し、著作権所有者の記載を、自作アプリの宣伝や推奨に用いてはならない。
↑The Artistic Licenseの9．より
さて、問題の商用配布ですが、
3.商用配布は常に許される。その利用方法が埋め込み、つまりパッケージのインターフェイスが商用配布のエンドユーザー
に見えるように意図しないことが条件。この場合はパッケージの配布とは解釈されない。
ってことですよね？
0363358
04/05/30 17:36ID:???ルのサブルーチンまたはメソッド（およびそれによって実現される仕様：例えばHTML::Templateなら、TMPL_VARタグ
など）と考えて良いのでしょうか？
もしこの解釈が間違っていなければ、尚且つ「エンドユーザー」がそのアプリを購入して実際にアプリとして稼動さ
せた場合の利用者であるならば、購入者に、「プログラマの方へ：paramメソッドのxxxx引数に掲示板の記事を入れて
下さい、デザイナの方へ：<TMPL_VAR NAME="xxxx">の部分に掲示板の記事が表示されますので適宜HTMLなどで装飾し
て下さい」などとインターフェイスをマニュアル上に書き込んでも、購入者はエンドユーザーでなく、これらのマニュ
アルを見て実際にアプリをチューニングして稼動させる側であり、その稼動したアプリを実際に利用する「エンドユー
ザー」ではないのでこのように購入者側にマニュアルとしてインターフェイスを公開してもThe Artistic Licenseの
8.には違反しないと解釈して宜しいですか？
また、それが正しいのであればパッケージの配布とは解釈されないので、「マニュアルに規定したチューニングなど
による改変以外、無断複製、無断改変を禁止します」と制限をかけることが出来ますか？そして配布と解釈されないの
で自作アプリの著作権表示を（当該パッケージの著作権表示とともに）記載しても構いませんか？
0364nobodyさん
04/05/30 18:56ID:???0365nobodyさん
04/05/30 19:09ID:???「インターフェイス」や「派生物」という言葉が何を指すかを
厳密に定義できるのは裁判官だけだ。国内では Artistic License
も GPL も判例が出ていないから、正しい答は誰にも出せんよ。
解釈に不安があるのなら、やるべきは実例を沢山漁って線の引き
処を掴むなり、ライセンス条文を書いた所へ直接尋ねる事だろうし、
相談相手にするべきは 2ch の名無しではなく君の会社の法務部
だろうな。
あと、完全にスレ違いの話題なので、続けたいなら余所へ
行ってくれんか。
http://pc5.2ch.net/test/read.cgi/tech/1045006087/
0366358
04/05/30 22:26ID:???>>365
ご回答ありがとです。仰る通り、これは第三者に聞いても解決しないかもしれ
ませんね。
法務部に回さなかったのは、結局のところ回したところで法解釈に留まり、そ
の解釈に何ら法的効力が担保されないと思ったからです。事実、仰る通りこれは
裁判官の判断しか法的効力を持たず、かといって国内では判例もないどころか通
説も見当たらないので「正しい答え」を知る為に、実務で私と同じような状況に
あって実際にこのライセンスを私と同じ状況下で、商用目的で利用されていらっ
しゃる方がいないかと思い、2chで聞かせて頂いたのです。
もう少しMLなどで聞いてみてそれでも駄目なら、直接、Sam Tregar氏に聞い
てみようと思います。
モジュールの話が、ライセンスの話になってしまい、ご指摘通り、スレ違いと
なりました。申し訳ないです。このスレでのこの話題についてはこれで終わりに
します。有難うございました。
■ このスレッドは過去ログ倉庫に格納されています