■ 変数についての覚書
Last Update: 2003--0-5- (Mon) 20: 1
Perl での変数の取り扱いについて。
2 つの変数の入れ替え
($one, $two) = ($two, $one);
ハッシュを値でソートする
%Hash = (a => 200, b => 1200, c => 300);
@Keys = sort { $Hash{$a} <=> $Hash{$b} } keys %Hash;
foreach my $key (@Keys){ print "$key , $Hash{$key} \n"; }
ハッシュの要素数取得
$num = keys %Hash;
Posted by Kyosuke Takayama at 2003-05-20 (Tue) 12:12 printable version