シェルエスケープ
sub shell_escape {
$_ = shift;
s/([\&\;\`\'\\\"\|\*\?\~\<\>\^\(\)\[\]\{\}\$\n\r ])/\\$1/g;
return $_;
}
sub shell_escape {
$_ = shift;
s/([\&\;\`\'\\\"\|\*\?\~\<\>\^\(\)\[\]\{\}\$\n\r ])/\\$1/g;
return $_;
}
http://cl.pocari.org/tb.php/2003-01-29-6
(トラックバックはありません)
この記事へのコメント
(コメントはありません)