04-21-2010
D=`perl -le "print scalar localtime (time() - "50"*60);"`
echo $D
D1=`perl -le "@x=localtime (time() - "50"*60); printf(\"%4d%02d%02d%02d%02d%02d\n\", \$x[5]+1900,\$x[4]+1,\$x[3],\$x[2],\$x[1],\$x[0])"`
echo $D1
and output
Wed Apr 21 17:54:25 2010
107382063610738185091074160772107416091610741609521074160988
$D is ok
except $D1
10 More Discussions You Might Find Interesting
1. UNIX for Dummies Questions & Answers
hi gurus!
i realize that my question shows my stupidness, but i need your help!
i have:
s_date=`date +%m-%d-%Y_%I%p`
variable and i need the same, but minus one hour..
what i made:
s_date=time(`date +%m-%d-%Y_%I%p`) - 3600
but i'm getting:
daily_exports.sh: line 20: syntax error near... (4 Replies)
Discussion started by: MarGur
4 Replies
2. Shell Programming and Scripting
hi i have file 1 as follows:
6
7
8
9
10
i have file 2 as follows:
5
5
5
5
5
i want file 3 as follows: (4 Replies)
Discussion started by: npatwardhan
4 Replies
3. Shell Programming and Scripting
hi,
i set up a script on my server to do a particular task once files from an external system are ftpd in the format compaq_20100110 (YYDDMM). Interestingly, the source of ftp is sending the files in the format e.g 20100109 i.e. previous date and for some reason this fails.kindly see my script... (2 Replies)
Discussion started by: bigtejus
2 Replies
4. Shell Programming and Scripting
Hallo all i am trying to execute this script ...............
But this is throwing the error......
use of uninitialized value in subtraction in at icd_convert.pl line 156
use of uninitialized value in subtraction in at icd_convert.pl line 157
use of uninitialized value in subtraction in at... (1 Reply)
Discussion started by: suvenduperl
1 Replies
5. Shell Programming and Scripting
HI gurus...
I have a PERL file that help me extract the date and time
of the file.
The format of this is: yyyymmddhhmmss.
Example:
20100430070935 (April 30 2010 07:09:35)
How can i subtract the acquired time from system's time..??
The answer... (6 Replies)
Discussion started by: bankimmehta
6 Replies
6. Shell Programming and Scripting
How can i print the output of a perl script on a unix console and redirect the same in a log file under same directory simultaneously ?
Like in Shell script, we use tee, is there anything in Perl or any other option ? (2 Replies)
Discussion started by: butterfly20
2 Replies
7. Shell Programming and Scripting
Hi,
I have having a great confusion in under standing the below terms.
a) "wall time" (time according the the clock on the wall vs. cpu time spent executing it)
what exactly it means?
For example:
wall time cpu time line:text
4.22404 24.186 if(some junk condition)
... (1 Reply)
Discussion started by: vanitham
1 Replies
8. Shell Programming and Scripting
Hi
#!/bin/sh
month=`date +%m`
year=`date +%Y`
echo $month
a=02
# Retaining Data for Current and Previous Month
lmonth=`expr $month - $a`
if test "$lmonth" = "0"
then
lmonth=12
year=`expr $year - 1`
fi
echo $year
echo $lmonth
The output is (3 Replies)
Discussion started by: Abhayman
3 Replies
9. Shell Programming and Scripting
Hello all .
I have two arrays.
${ARRAY_MOUNT_POINT_CAPACITY}
${ARRAY_MOUNT_POINT_CAPACITY}.
Whats the synatx of subtracting their values , placing them in variable V1 and then echoeing it ???
Ive tried expr and let ...gives me ./test_code.sh: difference: bad number (3 Replies)
Discussion started by: Junaid Subhani
3 Replies
10. Shell Programming and Scripting
I have dates as follows in a file
20121029135649
20121029135721
20121030091540
20121030093420
20121030094340
20121030095427
20121030095856
20121030100104
20121030100251
All these dates are in sorted order. I need to find out the difference between the dates as follows
2nd row... (6 Replies)
Discussion started by: meetsriharsha
6 Replies
LEARN ABOUT MOJAVE
time::epoch
Epoch(3) User Contributed Perl Documentation Epoch(3)
NAME
Time::Epoch - Convert between Perl epoch and other epochs
SYNOPSIS
#!/usr/bin/perl -wl
use Time::Epoch;
my $perlsec = 966770660; # Sun Aug 20 07:24:21 2000 -0400 on Mac OS
my $epochsec = perl2epoch($perlsec, 'macos', '-0400');
my $perlsec2 = epoch2perl($epochsec, 'macos', '-0400');
print $perlsec;
print $perlsec2;
print $epochsec;
# correct time on Unix:
print scalar localtime $perlsec;
# correct time on Mac OS (-0400):
print scalar localtime $epochsec;
DESCRIPTION
Exports two functions, "perl2epoch" and "epoch2perl". Currently only goes between Perl (Unix) epoch and Mac OS epoch. This is in
preparation for an eventual move of Perl to its own universal epoch, so we can get the system epoch of any platform that differs from
Perl's.
Epochs
o macos
Takes additional optional parameter of time zone differential. If time zone differential not supplied, we guess by getting the
different between "localtime" and "gmtime" with <Time::Local::timelocal>.
BUGS
o Hm. With the above test, "scalar localtime $perlsec" under my Linux box and "scalar localtime $epochsec" under my Mac OS box are off
by one second from each other. Maybe a leap second thing? Odd.
AUTHOR
Chris Nandor <pudge@pobox.com>, http://pudge.net/
Copyright (c) 2000-2003 Chris Nandor. All rights reserved. This program is free software; you can redistribute it and/or modify it under
the terms of the Artistic License, distributed with Perl.
SEE ALSO
perl(1), perlport(1), Time::Local.
perl v5.18.2 2003-05-21 Epoch(3)