http://qs1969.pair.com?node_id=543932


in reply to Parse and Summarise Big Brother logs

Nice!

...
chomp(my $today = `date +%Y-%m-%d`);
...
You could...
my (@date)=((localtime())[5,4,3]); $date[0]+=1900; $date[1]++; my ($today)=sprintf("%4i-%02i-%02i",@date);
THX!