Select Code to Download

use strict;
use warnings;
...
my $have = $datetime;
$have =~ s/(?<![:\d])0//g;
is ($have, $want);