my $date = strftime "%x", localtime;
$date =~ tr#/#-#;