萌えPerl
しきり線
$_たん
ソス@ソスソスソスソスノゑソスソスヘ。$_ソスソスソスだゑソスB
ソス@ソスソスソスAソスネゑソスト読むのゑソスソスソスソスト、$_ ソスヘダソスソスソス[ソスAソスソスソス_ソス[ソスoソス[ソスソスソスト読むんだ。(ソスソスソスソス!)
ソス@ソスソスソス黷ゥソスヌゑソスソスlソス[ソス~ソスソスソスOソスソスソスソスソスソスソスソスソス迢ウソスソスソスト。(^-^;
ソス@ソスニゑソスソスソスソスけソスナ、ソスソスソスソスソスソスソスソスヘ趣ソスソスソスソスiソスrソスQソス[ソスgソスソスソスソスヒ。
ソス@ソスナゑソスA
大項目 ソスマ撰ソス
ソス@ソスvソスソスソスOソスソスソスソスソスノは一時ソスIソスノ値ソスソスロ托ソスソスソスソストゑソスソスソスソスuソスマ撰ソスソスvソスニゑソスソスソスソスソスソスフゑソスソスソスソスソスワゑソスソスB
ソス@ソスマな撰ソスソスニ擾ソスソスソスソスワゑソスソスソスソスAソスソスソスフ抵ソスソスgソスヘ撰ソスソスナはなゑソスソスソスソスソスソスナゑソスソスソスソスワゑソスソスワゑソスソスソスB
ソス@ソスgソスソスソスソスソスヘ擾ソスソスwソスZソスナ習ソスソスソス齊滂ソスソスソスソスソスソスソスフソスソス竄假ソスニ趣ソスソスソスソス謔、ソスネ使ソスソスソスソスソスソスソスソスソスワゑソスソスB

ソス@ソス痰ヲソスホ、

$x = 1;
$y = 2;
$ans = $x + $y;

ソス@ソスニゑソスソスソスホ、$ansソスフ抵ソスソスgソスヘ3ソスノなゑソスソストゑソスソスワゑソスソスB

ソス@ソスソスソス黷セソスソスソスナなんだゑソスソスvソスZソス@ソスフようソスネゑソスソスニゑソスソスvソスソスソスOソスソスソスソスソスナ出ソスソスソスワゑソスソスヒ。

中項目 ソスRソスソズの変撰ソスソス{ソスソス
$_たん

ソス@ソスマ撰ソスソスノは以会ソスソスフ3ソスソズゑソスソスソスソスソスワゑソスソスB
  • ソスXソスJソスソスソス[ソスマ撰ソス
  • ソスzソスソスマ撰ソス
  • ソスnソスbソスVソスソスソスマ撰ソス

ソス@ソスソスソスソスソスト、ソスソスソスtソス@ソスソスソスソスソスXソスニゑソスソスソスソスソスソスフゑソスソスzソスソスマ撰ソスソスフようソスネ使ソスソスソスソスソスソスソスソスソスワゑソスソスB
ソス@ソスソスソスtソス@ソスソスソスソスソスXソスノつゑソスソストはゑソス竄アソスソスソスソスソスフで、ソスソスナ覚ソスソスソストゑソスソスソスソスソストゑソスソスソスソスワゑソスソスワゑソスソスソスB
ソス@ソスソスソスGソスネプソスソスソスOソスソスソスソスソスナなゑソスソスソスホ厄ソスソスソスソストゑソスソスソスソスvソスナゑソスソスB

中項目 ソスXソスJソスソスソス[ソスマ撰ソス
$_たん
ソス@ソスソスソスハに「ソスマ撰ソスソスvソスニゑソスソスソスソスニスソスJソスソスソス[ソスマ撰ソスソスフゑソスソスニゑソスソスwソスソスソスソスソスニゑソスソスソスソスソスソスナゑソスソスB

ソス@ソスXソスJソスソスソス[ソスマ撰ソスソスニは最擾ソスソスフ暦ソスナ擾ソスソスソスソスソスソス謔、ソスネ「ソスPソスツの記ソスソスソスノつゑソスソスPソスツの値ソスソスソスソスソスソスソスソスソスソスvソスソスソスソス ソスナゑソスソスB

ソス@ソスソスソスフ記ソスソスソスフ厄ソスソスOソスヘ趣ソスソスソスソスナ好ソスソスソスネゑソスソスフゑソスソスツゑソスソストよくソスAソスソスソスフソスソス[ソスソスソスヘ以会ソスソスフとゑソスソスソスナゑソスソスB

  • ソスソスソスソス $ ソスソスソスツゑソスソスソスB
  • ソスソスソスソスソスナ始ソスワる名ソスOソスヘダソスソスソスB
  • - ソスヘ使ソスソスソスソスソスソス_ソスソスソスB

ソス@$123abc ソスソス $ab-c ソスニゑソスソスソスソスソスソスOソスヘゑソスソス゚で、
ソス@$abc123 ソスソス $ac_c ソスヘオソスbソスPソス[ソスナゑソスソスB

ソス@ソスlソスソスソスソスソスソスソスソスニゑソスソスノゑソス

$x = 1;
$x = "ソスソスソスヨへゑソスソスソス";
$x = 'ソスソスソスヨへゑソスソスソス';

ソス@ソスニゑソスソスワゑソスソスBソスソスソスソスソスフとゑソスソスノゑソス""ソスソス''ソスナ囲みまゑソスソスB

中項目 ""ソスソス''ソスフ違い
$_たん

ソス@""ソスソス''ソスフ違いソスヘゑソスソスフ抵ソスソスフ変撰ソスソスソスWソスJソスソスソス驍ゥソスソスソスネゑソスソスソスソスナゑソスソスB

ソス@ソス痰ヲソスソス

#!c:/perl/bin/perl
$x = 'ソスヘゑソスソスソス';
$y = '$xソスソスソストゑソスソスソスソスソスソス<br>';
$z = "$xソスソスソストゑソスソスソスソスソスソス";
print "Content-type: text/html\n\n";
print $y;
print $z;
ソスソス
$xソスソスソストゑソスソスソスソスソスソス
ソスヘゑソスソスマゑソスソストゑソスソスソスソスソスソス

ソス@ソスニなゑソスワゑソスソスB""ソスナゑソスソスソスソスソスソスソスソスルゑソスソスヘゑソスソスフ抵ソスソスノ変撰ソスソスソスソスソスソスソスホ変撰ソスソスニゑソスソスト会ソスソスソスソスソスソストゑソスソスソスワゑソスソスソスソスA ''ソスナゑソスソスソスソスソスソスソスソスルゑソスソスヘ単ソスネる文ソスソスソスソスニゑソスソスト擾ソスソスソスソスソスソスワゑソスソスB

中項目 ""ソスナ変撰ソスソスソスソスソスソスフ包ソスソスソスソスニ搾ソスソスソスソスソスソストゑソスソスワゑソス
$_たん
ソス@ソスマ撰ソスソスソスソスソスソスフアソスソスソスtソス@ソスxソスbソスgソスニゑソスソスソスソスツゑソスソストゑソスソスワゑソスソスニゑソスソスノゑソス{}ソスナゑソスソスソスソスソスワゑソスソスB

#!c:/perl/bin/perl
print "Content-type: text/html; charset=Shift_JIS\n\n";
$x = "ソス|ソス[ソスVソスソスソスソス";
$y = "${x}EX";
print $y;
ソスソス
ソス|ソス[ソスVソスソスソスソスEX

中項目 ""''ソスソスマ撰ソスソスノ難ソスソス黷スソスソスソスニゑソス
$_たん
ソス@ソスワゑソスソスソス\ソスソスソスツゑソスソスワゑソスソスB
ソス@ソスソスソスニ趣ソズゑソスソス痰ヲソスホオソスbソスPソス[ソスナゑソスソスB

ソス@ソス~ソス@$x = 'ソズ擾ソスソスソス'ソスソスソスソスソスヘダソスソス'ソスニ鯉ソスソスソスソスソス'
ソス@ソスソスソス@$x = 'ソズ擾ソスソスソス\'ソスソスソスソスlソスlソスソス\'ソスニ鯉ソスソスソスソスソス'
ソス@ソスソスソス@$x = "ソズ擾ソスソスソス'ソス゚ゑソスソスソスソスソスソスソス'ソスニ鯉ソスソスソスソスソス"
ソス@ソス~ソス@$x = "ソズ擾ソスソスソス"ソスネゑソスワゑソスソスソス"ソスニ鯉ソスソスソスソスソス"
ソス@ソスソスソス@$x = "ソズ擾ソスソスソス\"ソスソスソスeソスソスソスネゑソス \"ソスニ鯉ソスソスソスソスソス"
ソス@ソスソスソス@$x = 'ソズ擾ソスソスソス"ソスAソスソスソスネゑソスソスソス"ソスニ鯉ソスソスソスソスソス'

中項目 ソスソスソスソスソスソス
$_たん

ソス@undef $x;

ソス@ソスニゑソスソスソスソス $x ソスフ抵ソスソスノは会ソスソスソスソスソスソスソスソストゑソスソスネゑソスソスソスヤになゑソスワゑソスソスB
ソス@$x=0; $x=""; $x='';
ソス@ソスナゑソスソスツ。

中項目 ソスソスソスソスソスソスソスニゑソスソスソスソスソスソスtソスフ意厄ソス
$_たん
ソス@ソスソスソスソスソスソスソスニゑソスソスソスソスソスソスtソスノはなゑソスニなゑソスソスQソスツの意厄ソスソスソスソスソスソスソスワゑソスソスB

  1. ソスマ撰ソスソスノ会ソスソスソスソスソスソスソスソストゑソスソスネゑソスソスソスヤにゑソスソスソスB
  2. ソスソスソスソスソスソスソスソスフ値ソスソスソスZソスbソスgソスソスソストゑソスソスソスソスB

ソス@ソスワゑソスソスAソスソスソスソスソスワゑソスノ会ソスソスソスソスソス`ソスソスソストゑソスソスネゑソスソスマ撰ソスソスノはデソス[ソス^ソス[ソスフゴソス~ソスフようソスネゑソスソスフゑソスソスソスソスソスソス驍アソスソス ソスソスソスソスソスソス轤オソスソスソスフで、ソスgソスソスソスニゑソスソスノは最擾ソスソスノ厄ソスソスmソスノ擾ソスソスソスソスソスソスソスソストゑソスソスソスソスフゑソスソスソスソスソスナゑソスソスB
ソス@ソス痰ヲソスホ、$x = ""; ソスニゑソスソストゑソスソスソスAprint $x; ソスニゑソスソスソスホ確ソスソスソスノ空文趣ソスソスソスソス\ソスソスソスソスソスソスワゑソスソスソスソスネにゑソス ソス\ソスソスソスソスソスソスワゑソスソスが、ソスソスソスソスソスネゑソス print $x; ソスニゑソスソスソスソスソスヌゑソスソスネるかソスソスソスソスソスソスネゑソスソスニゑソスソスソスソスソスソスニゑソスソスソスソスソスソス ソスソスソスソスソスナゑソスソスB

中項目 0 ソスソス "" ソスソス undef
$_たん
ソス@ソスソスソスフ包ソスソスソスソスヘゑソスソス黷ゥソスソスソスノ出ソストゑソスソスソスbソスノ影ソスソスソスソスソス髟費ソスソスソスネので、ソスソスソスヘわけソスソスソスかソスソスネゑソスソスソスソスソス ソスナゑソスソスソスソスAソスソスソスソスソスソスネゑソスソストゑソスソスソスソス\ソスナゑソスソスフで、ソスニりあソスソスソスソスソスヌみ暦ソスソスソスソスト会ソスソスソスソスフとゑソスソスノゑソスソスソスソスP ソスxソスソスソストゑソスソスソスソスソスソスソスソスB

ソス@undef ソスヘソスソスソスソスソスソスソスソスJソスソスソスソスソスト変撰ソスソス未抵ソス`ソスフ擾ソスヤにゑソスソスワゑソスソスB

ソス@ソスニゑソスソスソスソスけソスナ、0 ソスソス "" ソスヘ値ソスソスソス`ソスソスソス黷スソスマ撰ソスソスナ、undefソスヘ厄ソスソスソス`ソスフ変撰ソスソスナゑソスソスB
ソス@0 ソスソス "" ソスソス undef ソスヘ難ソスソスソスソス謔、ソスネ意厄ソスソスナゑソスソスソスソスAソスvソスソスソスOソスソスソス~ソスソスソスOソスフ際、ソスソスソスモゑソスソスネゑソスソスニ費ソスソス閧キ ソスソスニゑソスソスノ費ソスソスソスソスノ搾ソスソスソスソスソスソス驍ゥソスソスソスソスソスソスワゑソスソスソスB
ソス@ソス痰ヲソスホ、ifソスソスソスナ費ソスソス閧キソスソスニゑソスソスラて偽ソスノなゑソスワゑソスソスソスソスAdefined ソスソスソスソスundefソスヘ真ソスノ、0 ソスソス "" ソスヘ偽ソスノなゑソスワゑソスソスB
ソス@ソスソスソスニ、undefソスノつゑソスソストゑソス while(undef){} ソスソスソスニ費ソスソスソスソスソスソスワゑソスソスが、for(undef){} ソスソスソスニ費ソスソスソス ソスソスソスワゑソスソスB

ソス@ソスソスソスフ3ソスツはどゑソスソスソスuソスネゑソスノゑソスソスネゑソスソスvソスニゑソスソスソスソス_ソスナは「ソスソスソスソスモ厄ソスソスソスソスソスソスvソスネので、ソスソスソスソスソスソスソス閧オソスソス ソスソスソスソスニ費ソスソスソスソスソスソスソスソスソスソス閧オソストプソスソスソスOソスソスソスソスソスソスソス\ソスzソスOソスフ難ソスソスソスソスソスソスソスAソスQソストゑソスソス濶夲ソスだりしソスワゑソスソスB

  • Perlソスナゑソス 0 ソスソス "" ソスヘ偽ソスAソスソスソスソスネ外ソスヘ真ソスB
  • undef ソスヘ厄ソスソスソス`ソスB
  • ifソスソス ソスソス while,until ソスナゑソス undef ソスソス 0 ソスソス "" ソスニ難ソスソスソスソス謔、ソスノ偽ソスニ費ソスソス閧オソストゑソスソスソスワゑソスソスソスソスA defined ソスナ厄ソスソスソス`ソスソスソスヌゑソスソスソスソスニ包ソスソスソスソスニ、0 ソスソス "" ソスヘ抵ソス`ソスソスソスソストゑソスソスソスiソスlソスソスソスLソスソスjソスニ費ソスソス閧ウソスソスA undefソスヘ厄ソスソスソス`ソスiソスlソスソスソスソスソスソスソスjソスニゑソスソスソスソスソスソスハゑソスソスヤゑソスソストゑソスソスワゑソスソスB
  • for ソスソス undef ソスヘ「ソスソスソスソス`ソスネゑソスソスフゑソスソスPソスツゑソスソスソスvソスニ費ソスソスfソスソスソスソスソス謔、ソスナゑソスソスB

中項目 ソスzソスソスマ撰ソス
$_たん
ソス@ソスzソスソスマ撰ソスソスニ呼ばゑソスソスノ配ソスソスニゑソスソスソスソスソスソスソスソスソスソスニゑソスソスソスソスソスソスナゑソスソスB

ソス@ソスzソスソスニは、ソスPソスツの変撰ソスソスノ包ソスソスソスソスフ値ソスソスソスソスソスソスソスソスソスソスソスソスフでゑソスソスB

ソス@ソスOソスソス$ソスフ托ソスソスソスソス @ ソスソスtソスソスソスワゑソスソスB
ソス@ソスソスソスソスフ難ソスソスノゑソス $ ソスAソスソスソスソスソスソスソス[ソスwソスヤ搾ソス]ソスソスソスツゑソスソスワゑソスソスB
ソス@ソスヤ搾ソスソスヘ0ソスソスソスソスnソスワゑソスワゑソスソスB
ソス@ソスソスソスソスソスソスノゑソスソスソスソスフで暦ソスナ趣ソスソスソスソスニ、

#!c:/perl/bin/perl
print "Content-type: text/html; charset=Shift_JIS\n\n";
@x = ('ソスソスソスソスフゑソスソスソス','ソスsソスソスソスソスソスワゑソス','ソス髢ァソスソスソスソスソス');
print $x[0].'<br>';
print $x[1].'<br>';
print $x[2].'<br>';
ソスソス
ソスソスソスソスフゑソスソスソス
ソスsソスソスソスソスソスワゑソス
ソス髢ァソスソスソスソスソス

ソス@@x ソスノまとめて値ソスソスソスソス闕橸ソスソスナゑソスソスソスソスト、ソスgソスソスソスソスソスノゑソス @ ソスソス $ ソスノ変ゑソスソスト、ソスソスソスソス [] ソスソスt ソスソスソスソスソスソスソスAソスソスソスフ抵ソスソスノ番搾ソスソスソスソスソスソスワゑソスソスB
ソス@ソスwソスヤ搾ソスソスヘ0ソスソスソスソスnソスワゑソスワゑソスソスBソスソスソスソスソスソスPソスツめの値ソスソス $x[0] ソスノなゑソスワゑソスソスB
ソス@ソスソスソスフとゑソスソスソスソスモゑソスソスネゑソスソスニゑソスソスソスソスネゑソスソスフゑソスソスA$x ソスソス $x[0]ソスヘ全ソスソスソスハのゑソスソスフゑソスソスニゑソスソスソスソスソスソスニでゑソスソスB
ソス@$x[0] ソスソス @x ソスフ難ソスソスソスナゑソスソスソスソスA$x ソスヘ会ソスソスフ関係ソスソスソスネゑソスソスヤの托ソスソスlソスナゑソスソスB
ソス@ソスCソスソスソス[ソスWソスIソスノ擾ソスソスソスソスニゑソスソスソスソスソスソスネ。
ソス@@X ソスeソスソス
ソス@ $x[0] ソスソスソスフ難ソスソスソス
ソス@ $x[1]
ソス@ $x[2]
ソス@ $x[3]
ソス@ ソスc

ソス@ソスソスソスソスソス$x[0]ソスソスソスフゑソスソスフは包ソスソスハのスソスJソスソスソス[ソスマ撰ソスソスニ難ソスソスソスソスナゑソスソスフで単ソスフで使ソスpソスソスソス驍アソスニゑソスソスoソスソスソスワゑソスソスB

ソス@ソスソスA

$x[0] = 1;
$x[2] = 2;
$x[3] = $[0] + $[1];

ソス@ソスzソスソスマ撰ソスソスヘ難ソスソスソスソスソスソスOソスフ変撰ソスソスノ番搾ソスソスtソスソスソスソスソスソスソスト管暦ソスソスソスソスソスソスソスソスソスソスノ使ソスpソスソスソスワゑソスソスB
ソス@ソス痰ヲソスホ、ソスソスソスフ番搾ソスソスフ抵ソスソスノ変撰ソスソスソスソスソスソス驍アソスニゑソスソスツ能ソスネので、ソスネにゑソスソスフ都ソスソスソスナ臨機ソスソスソスマに使 ソスソスソスソスソスソスソスソスソスソスソスニゑソスソスノ便暦ソスソスナゑソスソスBソスiソスwソスヤ搾ソスソスソスソスソスソスソスマゑソスソスソスホ良ゑソスソスフで)

ソス@ソスソスA

#!c:/perl/bin/perl
@x = ('ソスソスソスニらいソスソスソスソスソス`','ソスソスソス[ソズゑソスソスソスソスソス');
print "Content-type: text/html; charset=Shift_JIS\n\n";
print 'ソスソスソスネゑソスソスヘ「ソスソスソスソスAソスソスソスト」ソスニ鯉ソスソスソスソスワゑソスソスソスソスH<br>';
print '0 = ソスヘゑソスソスA1 = ソスソスソスソスソスソス<br>';
print 'ソスiソスソスソスソス 0 ソスニゑソスソスj<br>'; #ソスソスソスソスソスソスソスソスソスワゑソスソスソスソスB(^-^;
$y = 0;
print $x[$y];
ソスソス
ソスソスソスネゑソスソスヘ「ソスソスソスソスAソスソスソスト」ソスニ鯉ソスソスソスソスワゑソスソスソスソスH
0 = ソスヘゑソスソスA1 = ソスソスソスソスソスソス
ソスiソスソスソスソス 0 ソスニゑソスソスj
ソスソスソスニらいソスソスソスソスソス`

ソス@$y = 1; ソスニゑソスソスソスソス ソスソスソス[ソズゑソスソスソスソスソス ソスニ表ソスソスソスソスソスソスワゑソスソスB
ソス@ソスソスソスニゑソスソスソスヌ会ソスソスソスソス驍アソスニゑソスソスナゑソスソスワゑソスソスB

ソス@$x[2] = 'ソスネにゑソス';

ソス@ソスソスソスニ包ソスソスソスソスソス竄キソスソスソス謔、ソスノ「ソスwソスヤ搾ソスソスvソスニ鯉ソスソスソスソスワゑソスソスソスソスソスソスAソスソスソスソスヘプソスソスソスOソスソスソス~ソスソスソスOソスpソスソスIソスノゑソス ソスuソスYソスソスソスソスソスvソスニ鯉ソスソスソスソスソスソスニゑソスソスソスソスソスソスナゑソスソスB

中項目 ソスzソスソスフ擾ソスソスソスソスソス
$_たん
ソス@ソスSソスフの擾ソスソスソスソスソス
ソス@undef @x;

ソス@ソスCソスモの要ソスfソスソスソスソスソスソスソスソスソスソスソスソス
ソス@delete $x[1];

ソス@ソスlソスソスソスZソスbソスgソスソスソストゑソスソスソスソスソスソスソスソスソス
ソス@@x = (1,2,3,4,5);
ソス@@y = qw(1 2 3 4 5);
ソス@ソスiqw ソスヘスソスyソス[ソスXソスナ具ソスリゑソスソスソスソスlソスソスソスZソスbソスgソスソスソス驩会ソスZソスqソスナゑソスソスBソスJソスソスソス}ソスソスソスレに痛ゑソスソスlソスヘよくソスgソスソスソスワゑソスソスBソスj

中項目 ソスzソスソスヨの厄ソスソスソス
ソス@ソスzソスソスノは以会ソスソスフようソスネ関撰ソスソスソスソスpソスモゑソスソスソストゑソスソスワゑソスソスB
ソスvソスfソスソスヌ会ソスソスvソスfソスソスソス除
ソスzソスソスフゑソスソスソスソスワゑソス(ソスソスソスソス)unshiftshift
ソスzソスソスフゑソスソスソスソスソスソス(ソスソスソスソス)pushpop
$x = unshift @x; $x = shift @x; push (@x,$x); pop(@x,$x);
shiftソスソスソス謔ュソスgソスソスソスソスソスソスソスナゑソスソスBソスTソスuソスソスソス[ソス`ソスソスソスフゑソスソスソスソスソスナ撰ソスソスソスソスソスソスワゑソスソスB

中項目 ソスzソスソスフ添ソスソスソスソス
ソス@ソスネ会ソスソスフようソスノ擾ソスソスソスソスニゑソスソスフ配ソスソスフ要ソスfソスソスソスソスvソスfソスソス-ソスP(ソスYソスソスソスソスソスフ最托ソスl(ソスYソスソスソスソスソスヘ0ソスソスソスソスnソスワゑソスフゑソス))ソスソスソスソスソスワゑソスソスB
@arrayソスフ要ソスfソスソス
$yousosuu = @array
@arrayソスフ添ソスソスソスソスソスフ最托ソスl
$max = $#array
ソスツゑソスソスナに、
ソスソスソスフ難ソスソスソスマ撰ソスソスノ撰ソスソスソスソスソスソスソスソスソスソスソスニ、ソスzソスソスフ撰ソスソスソスソスソスソス轤ケソスワゑソスソスB
ソスソスA
@a=(1,2,3,4,5,6,7,8);
$#a=3;
print @a;
ソスソス
1234ソス@ソスiソスYソスソスソスソスソスRソスワでの配ソスソスノなゑソスj

中項目 ソスzソスソスフ鯉ソスソスソス
@a=(@b,@c);
ソスソスソス黷セソスソスソスB

中項目 ソスnソスbソスVソスソスソスマ撰ソスソスiソスAソスzソスzソスソスj
$_たん
ソス@ソスAソスzソスzソスソスニゑソスソスソスソスソスソスワゑソスソスBソスナ近ではハソスbソスVソスソスソスニ呼ぶゑソスソスニゑソスソスソスソスソスソス謔、ソスノ思ソスソスソスワゑソスソスBソスハにどゑソス ソスソスナゑソスソスヌゑソスソスナゑソスソスB

ソス@ソスソスソスフ趣ソスソスヘ包ソスソスハの配ソスソスニ難ソスソスソスソスナ、ソスヤ搾ソスソスフ変ゑソスソスノ鯉ソスソスtソスソスソスgソスソスソストゑソスソス驍セソスソスソスナゑソスソスB

ソス@ソスeソスハの難ソスソスノゑソス%ソスソスソスツゑソスソスワゑソスソスB
ソス@ソスヤ搾ソスソスソスソスソスフ鯉ソスソスtソスニ難ソスソスeソスニの関連ソスtソスソスソスノゑソス => ソスソスソスgソスソスソスワゑソスソスB
ソス@ソスソスソスソスフゑソスソスソスソスソスノゑソス{}ソスソスソスツゑソスソスワゑソスソスB

#!c:/perl/bin/perl
print "Content-type: text/html; charset=Shift_JIS\n\n";
%x = ('nomal'=>'ソスDソスソスソスナゑソス','moe'=>'ソスソスDソスソスソスソスソスソス');
print "ソスソスソスソスソスソスソストなゑソスソス@ソスソスソス@".$x{nomal}."<br>";
print "ソスSソスソスソストゑソスソスソス@ソス@ソスソスソス@".$x{moe}."<br>";
print "ソスuソスソスソスソスvソスネのゑソスソスソスI";
ソスソス
ソスソスソスソスソスソスソストなゑソスソス@ソスソスソス@ソスDソスソスソスナゑソス
ソスSソスソスソストゑソスソスソス@ソス@ソスソスソス@ソスソスDソスソスソスソスソスソス
ソスuソスソスソスソスvソスネのゑソスソスソスI

ソス@ソスzソスソスマ撰ソスソスナ使ソスソス[]{}ソスフ抵ソスソスフ撰ソスソスソスソス笊カソスソスソスヘ添ソスソスソスソスソスニ呼びまゑソスソスB
ソス@ソスYソスソスソスソスソスソスソスソスソスソスソスナゑソスソスソスフと包ソスソスソスソスナゑソスソスソスフとでは使ソスソスソスソスソスソスソスソスナ暦ソスソスヨ撰ソスソスソスソスルなゑソスワゑソスソスB
ソス@ソスヘゑソスソス゚はゑソスソスワゑソスnソスbソスVソスソスソスソスソスgソスソスソスソスソスニゑソスソスネゑソスソスソスソスソスソスナゑソスソスソスソスAソスワとまゑソスソスソスソスfソス[ソス^ソス[ソスソスソスソス闊オソスソスソスソス ソスソスソスノなゑソスニゑソスソス閧ェソスソスソスンゑソスソスナてゑソスソスワゑソスソスB

中項目 ソスnソスbソスVソスソスソスフ擾ソスソスソスソスソス
$_たん
ソス@ソスSソスフの擾ソスソスソスソスソス
ソス@undef %x;

ソス@ソスCソスモの要ソスfソスソスソスソスソスソスソスソスソスソスソスソス
ソス@undef $x{nomal};

ソス@ソスlソスソスソスZソスbソスgソスソスソストゑソスソスソスソスソスソスソスソスソス
ソス@%x = ('A'=>1,'B'=>2,'C'=>3);
ソス@%y = ('A',1,'B',2,'B',3);
ソス@ソスiソスソスソスハは擾ソスj

中項目 ソスvソスfソスフ擾ソスソスソス
$_たん
ソス@ソスnソスbソスVソスソスソスフ場合ソスソス
ソス@%x = ('nomal'=>'ソスDソスソスソスナゑソス','moe'=>'ソスソスDソスソスソスソスソスソス');
ソス@ソスニ抵ソス`ソスソスソストゑソスソスAソスRソスソスソスsソスソスソス[ソス^ソス[ソスIソスノはゑソスソスフ擾ソスソスヤはめゑソスソス痰ュソスソスソスソスノなゑソスソストゑソスソスワゑソスソスB
ソス@ソスソスソスソスソスソス print %x; ソスニゑソスソスソスソス鼾ソスAソスKソスソスソスソスソスソスソスソスソスヤどゑソスソスソスノは表ソスソスソスソスソスソスワゑソスソスソスB
ソス@ソスソスソスソスソスソスヌゑソスソスソスソスソスソスニ鯉ソスソスソスソスホ、ソスソスソスワゑソスヌゑソスソスナゑソスソス謔「ソスフでゑソスソスソスソスB
ソス@ソスソスソスニゑソスソスソスソスPソスツ、print %x; ソスニゑソスソスソスニ包ソスソスソスソスソスソスソスソスソスソスソスソスナゑソスソスソスソスA%x ソスフ抵ソスソスgソスソス
ソス@'nomal','ソスDソスソスソスナゑソス','moe','ソスソスDソスソスソスソスソスソス'
ソス@ソスニなゑソスソストゑソスソスト、ソスソスソスソスソスが4ソスツ格ソス[ソスソスソスソストゑソスソスワゑソスソスB
ソス@ソスソスソスソスヘ包ソスソスハの配ソスソスニ難ソスソスソスソスナゑソスソスBソスソスソスフ包ソスソスソスソスソスフデソス[ソス^ソス[ソスソスソスnソスbソスVソスソスソスニゑソスソスト茨ソスソスソスソスニゑソスソスノ、ソスソス ソスソスソスヤ目の包ソスソスソスソスソスソスソスuソスLソス[(ソスYソスソスソスソス)ソスvソスニゑソスソスAソスソスソスソスソスヤ目の値ソスソスソスuソスlソスvソスニゑソスソストゑソスソスソスノゑソスソスソスソスネゑソスソスソス ソスナゑソスソスB
ソス@ソスソスソスト、ソスハに包ソスソスハに使ソスソスソスソスソスノはゑソスソスソスネゑソスソスニ意趣ソスソスソスソスソスKソスvソスヘなゑソスソスフで覚ソスソスソスネゑソスソスト良ゑソスソスナゑソスソスソスB

ソスネどと鯉ソスソスソスソストゑソスソス驍、ソスソスソスノ、ソスソスソスソスソスミ介すソスソスPerlソス{ソスソスソスソスソスソスソスネゑソスソストゑソスソスワゑソスソスワゑソスソスソスソスB
ソスソスソスソスソスネりたソスソスソスソスソスト本ソスソスヌゑソスナゑソスソスネゑソスソスニゑソスソスソスソスソスソスwソスヤゑソスソスIソス謔キソス骼ソスB(-_-;
ソスニゑソスソスソスソスけソスナ、ソスvソスソスソスOソスソスソスソスソスニは厄ソスソスヨ係ソスナゑソスソスソスソスFソスl(ソスニ趣ソスソスソスソスソスソスソスノ思ソスソスソストゑソスソス驍セソスソスソスソスソスソスソスソスソスソス ソスネゑソス)ソスフ擾ソスソスソスソスソスソスミ介しソスワゑソスソスBソスソスソスソスソスト会ソスソスソスソスソスソスB

ソスソスソスソスソスCソスソスソス[ソスWソスソスソスノゑソスソスソスソス謔、ソスネ別撰ソスソスEソスヨ叩ソスソスソスソスソスワゑソスワゑソスソスソスソスAソスヌみやすソスソスソスソスソスヘで抵ソスRソスソスソスソスソスソスソスソス ソスソスソスフシソス[ソスソスソスソスソスト撰ソスソスソスソスソスワゑソスソスBソスソスソスホ費ソスソスソスソスソスソスZソスソスソスXソスフ趣ソスソスソスソスソスナゑソスソスBソスソスソスしソスソスソスB





ソスル趣ソスソスソスソスル包ソスソスフ厄ソスソスlソスナゑソスソスBソスソスソスiソスソスソス`ソスソスソスノなゑソスソストゑソスソスソスGソスソスソスフてゑソスソスソスソスソスソスフでゑソスソスソスソスソスソスニ趣ソスソスネのでプソスソスソスフイソスソス ソスXソスgソスソスソス[ソス^ソス[ソスソスソスソスノ。
ソスソスソスソスソスソスソスAソスソスソスAソスfソスソスソス轤オソスソスソスGソスソスソスGソスソスソスB



ソスソスソスソスソスネ前ソスソスソスeソスソスソスソスソスソスソスソスソスト戴ゑソスソスソスソスソスソスソスナゑソスソスB
ソスヘゑソスソスソスソスソスソスネゑソスソスソス皷橸ソスソスソスミ会ソスvソスソスソスワゑソスソスB