javascriptはよく検証して集めます.

ホームページを作る時、javascriptによく使われています.入力テキストの検証に対して、私はネットで便利な製品を作っています.だから、ip住所、mac住所などの検証用が多いです.
普段よく使われている検証関数をいくつか集めた.
 
    検証IP:
 

<script language="javascript">
function ipvalid(ip)
{
        if (ip == "") return;
        var reg = /^(25[0-5]|2[0-4][0-9]|1[0-9]{2}|[1-9]{1}[0-9]{1}|[1-9])\.(25[0-5]|2[0-4][0-9]|1[0-9]{2}|[1-9]{1}[0-9]{1}|[0-9])\.(25[0-5]|2[0-4][0-9]|1[0-9]{2}|[1-9]{1}[0-9]{1}|[0-9])\.(25[0-5]|2[0-4][0-9]|1[0-9]{2}|[1-9]{1}[0-9]{1}|[0-9])$/;
        if (!reg.exec(ip))
                alert(ip+" is not IP address");
}
</script>

 
    認証MASK:

<script language="javascript">
function maskvalid(mask)
{
        if (mask == "") return;
        var reg0 = /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/;
        if (!reg0.exec(mask)) alert(mask+" is not mask");
        var maskArray = mask.split(".");
        var mask1 = parseInt(maskArray[0]);
        var mask2 = parseInt(maskArray[1]);
        var mask3 = parseInt(maskArray[2]);
        var mask4 = parseInt(maskArray[3]);

        var reg1 = /254|252|248|240|224|192|128/;
        var reg2 = /255/;
        var reg3 = /254|252|248|240|224|192|128|0/;

        if (reg1.exec(mask1)) {
                if (mask2 != 0 || mask3 != 0 || mask4 != 0)
                        alert(mask+" is not mask");
        } else if (reg2.exec(mask1)) {
                if (reg1.exec(mask2)) {
                        if (mask3 != 0 || mask4 != 0) 
                                alert(mask+" is not mask");
                } else if (reg2.exec(mask2)) {
                        if (reg1.exec(mask3)) {
                                if (mask4 != 0)
                                        alert(mask+" is not mask");
                        } else if (reg2.exec(mask3)) {
                                if (!reg3.exec(mask4))
                                        alert(mask+" is not mask");
                        }
                }
        } else {
                alert(mask+" is not mask");
        }
}
</script>

 
    上のコードがperlファイルで使用される場合は、必ず\d、$/などにバックスラッシュを追加してください.覚えてください
    たとえば:  本来の正規表現は  /^\d｛1,3｝米ドル/
 perlファイルに転送文字を追加しましたが、結果は/^\d｛1,3｝です.