my $today_str = POSIX::strftime( "%m/%d/%Y", localtime );