金曜日, 9月 23, 2011
初めてのPerl
新しくリリースしたサービスが期待以上に多くの方にご利用いただいているため再度PR
無料で使える大容量転送サービス
大容量ファイル保管サービスファイリー
本書も整理のため再読
上のFileyもPerlでつくってますよ：）
eval の使い方
モジュール
Cwd
Fatal
File::Basename
File::Copy
File::Spec
Image::Size
Net::SMTP
POSIX
Sys::Hostname
Text::Wrap
Time::Local
・プラグマ
constant
diagnostics
lib
strict
vars
warnigs
クォートなしのハッシュキー
my %score = (
barney => 195,
fred => 205,
dino => 30,
);
スライス
my ($card_num, $count) = (split /:/)[1,5];
配列スライス
my @names = qw{ zero one two three four five six seven eight nine };
print "@names[9,0,2,1,0]
ハッシュスライス
my @players = qw/ barney fred dino /;
my @bowlings_scores = (195, 205, 30);
@score{ @players } = @bowling_scores;
($score{"barney"}, $score{"fred"}, $score{"dino"}) への代入と同じこと
