パソいろ パソコンやIT関連、周辺機器や開発のことなど

パソコンや開発、Linuxやデータベースのことなど

Perlのリファレンスとは
Perlのリファレンス(参照)

普通の変数に値を代入する。

$a = 100;

参照の場合は値ではなく、値のある場所を示すものが入る。

$b = \$a;

$a 100

$b ─┘

上記のように参照する場合は参照したい変数の前に\(¥エン)を付けます。
この状態で$bの値をprintで表示してもSCALAR(0x1832660) というようなよく分からない値が返る。

$bが参照しているものの内容を知りたい場合には以下のように$を付けます。
print ${$b};
省略して以下のように書くこともできる。
print $$b;

この状態で$aの内容を変更すると以下のようになります。

Perlのコード
$a = 200;

$a 200

$b ─┘

実際に
print $$b;
と実行すると 200と表示される。

$$ ドルドル
VB2005 数字、アルファベット、一部記号を半角変換
カタカナはそのままで、数字、アルファベット、一部記号を半角変換。

Public Function abc123ToHankaku(ByVal s As String) As String

Dim re As Regex = New Regex("[0-9A-Za-z():,- ]+")
Dim output As String = re.Replace(s, AddressOf myReplacer)

Return output
End Function

Private Function myReplacer(ByVal m As Match) As String
Return Strings.StrConv(m.Value, VbStrConv.Narrow, 0)
End Function