Select Code to Download

    my @keys = qw(time_value hour_24 minute second hour_12 am_pm);

...

    my $sth = $dbh->prepare($sql);
    $sth->execute(@time{@keys});