Shell Programming and Scripting

export HISTFILE=/var/log/user_history/JP1_history

export HISTFILESIZE=20000

export HISTSIZE=5000

export HISTTIMEFORMAT="%F %T "

[root@H99A100 user_history]# ./test
Month '23' out of range 0..11 at -e line 2

#!/bin/bash
# YYYY MM DD HH MM SS
# perl autosplits the string and uses timelocal to return
# the number of seconds from the Epoch
# No error checking!
function seconds_from_epoch {
echo $*| perl -MTime::Local -ane '
my $epochseconds = timelocal($F[5], $F[4], $F[3], $F[2], $F[1], $F[0]);
print "$epochseconds\n"; '
}

# parse file s32adm_bash_history date and time
set - $(ls -l s32adm_bash_history)
fdate=$6
ftime=$7

# parse the year, month, and day
set - $(IFS="-"; echo $fdate)
fyear=$1
fmonth=$2
fday=$3

# parse the hours and minutes
set - $(IFS=":"; echo $ftime)
fhour=$1
fmin=$2

totsecs=$(seconds_from_epoch "$fyear $fmonth $fday $fhour $fmin 0")
echo $totsecs

echo $*

[root@H99A100 user_history]# ./test
Day '' out of range 1..31 at -e line 2

#!/bin/bash
# YYYY MM DD HH MM SS
# perl autosplits the string and uses timelocal to return
# the number of seconds from the Epoch
# No error checking!
function seconds_from_epoch {
echo $*| perl -MTime::Local -ane '
my $epochseconds = timegm($F[5], $F[4], $F[3], $F[2], $F[1], $F[0]);
print "$epochseconds\n"; '
}

# parse file s32adm_bash_history date and time
set -- $(ls -l s12adm_history)
fdate=$6
ftime=$7

# parse the year, month, and day
set -- $(IFS="-"; echo $fdate)
fyear=$0
fmonth=$1
fday=$2

# parse the hours and minutes
set -- $(IFS=":"; echo $ftime)
fhour=$3
fmin=$4
fsecs=$5

totsecs=$($fsecs $fmin $fhour $fday $fmonth $fyear)
echo $totsecs

[root@H99A100 user_history]# ./test
./test: line 29: Mar: command not found