Shell Programming and Scripting

# The Time CLI Option Can be in the format of:
    --start-time="1day"
    --start-time="2hours"
    --start-time="45min"
    --start-time="50sec"

> ./my_script --start-time="1day"

### Calculate the Current Time in UNIX-Time format
#         current_time = "1368808927"
my ($sec,$min,$hour,$mday,$mon,$year) = localtime(time);
my $current_time = timelocal($sec,$min,$hour,$mday,$mon,$year);

### Convert the User's $start_time to Seconds:
#         *Lets pretend I already captured the Arg and split out the "$time_number" == 1 and the "$time-unit" == day

### If the time_unit is days, then convert 'n' days to seconds
if ($time_unit eq "day")
{
        # total_seconds == 86400 seconds (*86400 sec in 1 day)
        my $total_seconds = (($time_number * 24) * 60) * 60
        #  (1368808927  +  86400) == 1368895327
        my $START_TIME = ($current_time + $total_seconds);
}

Current Date/Time in UNIX and Standard Formats:
- If the Current UNIX-Time == 1368808927
- Current Standard-Time (using time-stamp above) == 05-17-2013 12:42:07 PM 

Calculated Date/Time in UNIX and Standard Formats:
- if the Future UNIX-Time == 1368895327
- Future Standard-Time (using from the CLI "date --date="1970-01-01 1368895327 sec" "+%m-%d-%Y %r") == 05-18-2013 05:42:07 PM

### $unix_start_time contains the UNIX-Timestamp of the "future" date/time 
#  Array contains -> sec[0] min[1] hour[2] mday[3] mon[4] year[5] wday[6] yday[7] isdst[8]
my (@my_time) = localtime($unix_start_time);

print "${BOLD}FUTURE TIME ==${OFF} $my_time[4]-$my_time[3]-$my_time[5] $my_time[2]:$my_time[1]";


____OUTPUT____

FUTURE TIME == 4-18-113 13:49

#! /usr/bin/perl

use warnings;
use strict;
use POSIX 'strftime';

my $current_time = time();

my $time_number = 1;
my $time_unit = "day";

my ($total_seconds, $START_TIME) = (0, 0);

if ($time_unit eq "day")
{
        # total_seconds == 86400 seconds (*86400 sec in 1 day)
        $total_seconds = $time_number * 86400; # Same as 24 * 60 * 60
        #  (1368808927  +  86400) == 1368895327
        $START_TIME = ($current_time + $total_seconds);
}

print "Future time: ", strftime("%m-%d-%Y %I:%M:%S %p", localtime($START_TIME)), "\n";