Perlでリクに答えるスクリプトを作るスレ

Perlでリクに答えるスクリプトを作るスレ at TECH

305:デフォルトの名無しさん
05/11/20 00:00:39
>>304
それはやりたい事と違うかも。
PHPでは<? ?>内じゃ無い部分はそのまま出力
use IO::File;
my $fh = new IO::File 'sample.txt';
while (<$fh>) { print $_ }
undef $fh;
やりたい事はどっちだろね

…複合型だと言うならスクリプト部分を判別出来るようにして置いて、マッチングしてevalに放り込む
s/<\?perl(.*?)\?>/$1/ge
例えばこんな感じで

次ページ

続きを表示

1を表示