Following your basic strategy, but using -s, Time::Piece and YAML:
perl -MTime::Piece -MYAML -nle '$t=localtime+(stat)[9];$d{$t->ymd}+=-s;END{print Dump \%d}'In reply to Re: Golfing a size/date grabber
by Zed_Lopez
in thread Golfing a size/date grabber
by delirium
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |