2007-12-04から1日間の記事一覧
練習問題の回答をメモ。 ex06-1 #!/usr/bin/perl use strict; use warnings; use Storable; my $all = "**all machines**"; my $log_data_name = 'log_data'; my %total_bytes; # 保存しておいた %total_bytes をロードする。ハッシュリファレンスをデリファ…
練習問題の回答をメモ。 ex06-1 #!/usr/bin/perl use strict; use warnings; use Storable; my $all = "**all machines**"; my $log_data_name = 'log_data'; my %total_bytes; # 保存しておいた %total_bytes をロードする。ハッシュリファレンスをデリファ…