こちらのデータを使いました。 www.macrotrends.netデータは日々の日経平均株価なので毎月月初日だけに絞り込むプログラムを作った。day2month.pl use warnings; my $month = 13; while (my $line = <>) { if ($line =~ /^\d\d\d\d-(\d\d)-\d\d/ and $month …