perl - qq(@{[ Interpolate->any->given('expression') ]}) : 404 Blog Not Found2006年05月30日18:05 カテゴリLightweight Languages perl - qq(@{[ Interpolate->any->given('expression') ]}) ミッカッチャッタ:) spiritlooseのはてなダイアリー - 文字列中で式を実行 結果は print "@{[$foo->bar]}"; print "${\$foo->bar}"; こんな感じ。 ただ、このレヴェルのInterpolationは、Securityのことを考えると避けたいのが本当のところ。 たとえば、以下のscriptを考えてみる。 danger.cgi #!/usr/local/bin/perl use strict; use warnings; use CGI; $ENV{PATH} = '/bin:/usr/bin:/usr/local/bin'; my $q = C
![perl - qq(@{[ Interpolate->any->given('expression') ]}) : 404 Blog Not Found](https://cdn-ak-scissors.b.st-hatena.com/image/square/b78f2ffdf4c59091f2ac617490c58f3a6c649e0d/backend=imagemagick;height=288;version=1;width=512/https%3A%2F%2Fparts.blog.livedoor.jp%2Fimg%2Fusr%2Fcmn%2Fogp_image%2Flivedoor.png)
