BigFatCat https://blog.hatena.ne.jp/BigFatCat/ BigFatCatのブログ https://bigfatcat.hateblo.jp/ perl 練習問題の回答をメモ。今回は、かなりひどいプログラムを書いてしまったけど、自戒の念をこめてそのまま貼っておく。ヒントに書いてあった mtime を活用しないで、自力で mtime 相当のものを求めようとしているのがまずい。 #!/usr/bin/perl -w use strict; use warnings; use File::Find; use Time::Local; my $target_dow = 1; my @starting_directories = ("."); my $seconds_per_day = 24 * 60 * 60; my($sec, $min, $hour… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fbigfatcat.hateblo.jp%2Fentry%2F20071207%2F1197048513" title=" 続・初めてのPerl 第7章 「サブルーチンへのリファレンス」 - BigFatCatのブログ" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2007-12-07 02:28:33 rich https://bigfatcat.hateblo.jp/entry/20071207/1197048513 1.0 100%