| From(投稿者): | jun@nih.go.jp |
|---|---|
| Newsgroups(投稿グループ): | fj.comp.lang.perl |
| Subject(見出し): | my in eval |
| Date(投稿日時): | 31 Oct 2003 10:02:18 GMT |
| Message-ID(記事識別符号): | (G) <JUN.03Oct31190218@watson.nih.go.jp> |
| Followuped-by(子記事): | (G) <3FA32785.3090209@geocities.co.jp> |
| (G) <YAS.03Nov2000555@kirk.is.tsukuba.ac.jp> |
以下のコードを実行すると、$a,$b,$cに何も代入されないのですが、
myを削除するとうまくいきます。どうしてなのでしょうか?
$data = "1 2 3";
$cmd = 'my($a,$b,$c)=split(/\s/,$data);';
eval $cmd;
print "$a $b $c\n";
--
石川 淳 国立感染症研究所
(Jun Ishikawa) 生物活性物質部第四室
jun@nih.go.jp (旧遺伝生化学室)
Tel. 03-5285-1111 Fax 03-5285-1272
http://nocardia.nih.go.jp/
I hate damn sequences!