LEFT関数のようなもの（７桁の数字から左の３桁の数字を抜き出す）

質問

はじめての質問です、よろしくお願いします。

ホームページでのアクセス制限を行うフリーｃｇｉを修正・改造して、目的にかなうように作り替えたいのです。

このアクセス制限で行いたいのは
　・パスワードに７桁の数字を入力（例：1234567）
　・左の３桁（123）だけをパスワードリストに照合。

この「７桁の数字から左の３桁の数字を抜き出す」という部分にお手上げの状態です。

LEFT関数の様なもの、または、そのような処理をする方法について、アドバイスやヒントをお願い致します。

また、入力されたパスワードが７桁かどうかのチェック方法についてもよろしければアドバイス下さい。

回答No.1

w-inty · ベストアンサー

substr(文字列,取り出す最初の位置,取り出す長さ)

というのを使えばOKです。

文字数を数えたいのであれば
length(文字列)
がいいかと。（ただしバイト数ですので）

お礼

ありがとうございました。
substrは基本のようですが、こんなことも分かりませんでした。

しかし、おかげさまで、目的のcgiへの改造がうまく行きました。

回答No.3

HOGERA3

こんなのはどうでしょう。

if ($password =~ /\D*(\d{3})\d{4}\D*/) {
　　$left3 = $1;
}

お礼

ありがとうございました。

回答No.2

liar_adan

パスワードを $passwordとして、

・右3桁を抜き出す。
$password % 1000

・7桁か確かめる。
1000000 <= $password && $password < 10000000

ではどうでしょう。
perlをしばらくやっていないので自信なしですが。

お礼

今、この式の意味を勉強中です。
ありがとうございました。