sub numeric_p {
local($data) = @_;
if ($data =~ /^-?\d*\.?\d*(e\d|e-\d)?\d*$/) {
$true;
} else {
$false;
};
}
このコードをどうすればPHP
に変換できますか?私が翻訳できないのは、if
で始まる3行目の作品だけです。PerlからPHPへの翻訳
どうすればいいですか?
sub numeric_p {
local($data) = @_;
if ($data =~ /^-?\d*\.?\d*(e\d|e-\d)?\d*$/) {
$true;
} else {
$false;
};
}
このコードをどうすればPHP
に変換できますか?私が翻訳できないのは、if
で始まる3行目の作品だけです。PerlからPHPへの翻訳
どうすればいいですか?
これは、$data
が次の正規表現に一致する場合のテストです。それはちょうど、PHPでpreg_match()
への呼び出しを次のようになります。
// In Perl
if ($data =~ /^-?\d*\.?\d*(e\d|e-\d)?\d*$/)
// In PHP:
if (preg_match('/^-?\d*\.?\d*(e\d|e-\d)?\d*$/', $data))
あなたは、あなたのPHPコードにa)がありませんでした –
@ScottHarwellありがとう、編集されました。 –
PHPのpreg_match
機能はPerlの=~
オペレータと同じ目的を果たします。
あなたのニーズには適していないかもしれませんが、[is_numeric](http://php.net/manual/en/function.is-numeric.php)メソッドをチェックしてください。 – CBusBus
パフォーマンスが重大な場合は、この種のものにPerlを使用してください。ちょうど一般的なアドバイス。 – AlfredoVR