I am having semi column separated file as below. I am having negative values for the records starting with 11095. How can I convert that positive number
Hi Gurus,
In my file I have an amount field from position 74 to 87, which contains values starting with '+' as well as '-'. I want to add all positive values in a varible called "CREDIT" and all negative values in a variable "DEBIT". I know, we can use grep to identify values with positive and... (4 Replies)
Hello,
For my weather station I have made a little perl script to put the data into cacti. The next problem I have.
I can only get positive numbers or negative numbers.
What do I do:
Though a shell scrip I call the perl script.
Shell script:
#!/bin/sh
cat data.txt | stats.pl
Perl... (4 Replies)
Hi,
I have a file that looks like this:
Jake 2 3 4 6 4 3 -2 -1
Jerry 1 2 3 2 1 7 -6 -1
Timmy -1 -4 -5 -8 9 3 1
I want to find the most positive and negative value for each row and also define its position (based on column #)
So the output would look... (7 Replies)
Hello,
I have a list like this :
1
2
-4
0
-3
-7
5
6 etc.
Is there a way to remove all the positive values and print only the negative values, without using grep, sed or awk?
Thanks,
Prasanna (4 Replies)
Let, I have three numbers
+00123.25
-00256.54
+00489.23
I need to sum up all those three numbers, after storing them in three variables (say var1, var2, var3).
I used both expr and BC, but they didn't work for me.
But, I am not able to sum up them, as I don't have any idea how to... (13 Replies)
Hi all,
I have a file that looks like shown below. I want to find places where the value in column 2 change from negative to positive and vice versa and return the value on column 1 at that point. I wonder if this is possible in shell script or awk .. please help!
Here is the original data
... (6 Replies)
Hello all,
I'm new to the forums and hope to be able to contribute something useful in the future; however I must admit that what has prompted me to join is the fact that currently I need help with something that has me at the end of my tether.
I have a PDB (Protein Data Bank) file which I... (13 Replies)
Dear All,
I have to split a tab delimited file in two files based on the presence of a positive or negative in column number 9 , for example
file:
A 1 5 erg + 6766 0.9889 0.9817 9.01882 erg inside upstream
B 1 8 erg2 + 6766 0.9889 0.9817 -9.22 erg2 inside... (3 Replies)
I have a file that is pipe delimited and in Column F they have number values, both positive and negative. I need to take the one file I am starting with and split it into two separate files based on negative and positive numbers. What is the command to do so? And then I need to also transfer... (4 Replies)
Discussion started by: cckaiser15
4 Replies
LEARN ABOUT DEBIAN
time::y2038
Time::y2038(3pm) User Contributed Perl Documentation Time::y2038(3pm)NAME
Time::y2038 - Versions of Perl's time functions which work beyond 2038
SYNOPSIS
use Time::y2038;
print scalar gmtime 2**52; # Sat Dec 6 03:48:16 142715360
DESCRIPTION
On many computers, Perl's time functions will not work past the year 2038. This is a design fault in the underlying C libraries Perl uses.
Time::y2038 provides replacements for those functions which will work accurately +/1 142 million years.
This only imports the functions into your namespace. To replace it everywhere, see Time::y2038::Everywhere.
Replaces the following functions:
gmtime()
See "gmtime" in perlfunc for details.
localtime()
See "localtime" in perlfunc for details.
timegm()
my $time = timegm($sec, $min, $hour, $month_day, $month, $year);
The inverse of "gmtime()", takes a date and returns the coorsponding $time (number of seconds since Midnight, January 1st, 1970 GMT). All
values are the same as "gmtime()" so $month is 0..11 (January is 0) and the $year is years since 1900 (2008 is 108).
# June 4, 1906 03:02:01 GMT
my $time = timegm(1, 2, 3, 4, 5, 6);
timegm() can take two additional arguments which are always ignored. This lets you feed the results from gmtime() back into timegm()
without having to strip the arguments off.
The following is always true:
timegm(gmtime($time)) == $time;
timelocal()
my $time = timelocal($sec, $min, $hour, $mday, $month, $year);
my $time = timelocal($sec, $min, $hour, $mday, $month, $year, $wday, $yday, $isdst);
Like "timegm()", but interprets the date in the current time zone.
"timelocal()" will normally figure out if daylight savings time is in effect, but if $isdst is given this will override that check. This
is mostly useful to resolve ambiguous times around "fall back" when the hour between 1am and 2am occurs twice.
# Sun Nov 4 00:59:59 2007
print timelocal(59, 59, 0, 4, 10, 107); # 1194163199
# Sun Nov 4 01:00:00 2007 DST, one second later
print timelocal(0, 0, 1, 4, 10, 107, undef, undef, 1); # 1194163200
# Sun Nov 4 01:00:00 2007 no DST, one hour later
print timelocal(0, 0, 1, 4, 10, 107, undef, undef, 0); # 1194166800
$wday and $yday are ignored. They are only there for compatibility with the return value of "localtime()".
LIMITATIONS
The safe range of times is +/ 2**52 (about 142 million years).
Although the underlying time library can handle times from -2**63 to 2**63-1 (about +/- 292 billion years) Perl uses floating point numbers
internally and so accuracy degrates after 2**52.
BUGS & FEEDBACK
See http://rt.cpan.org/Dist/Display.html?Queue=Time-y2038 to report and view bugs.
If you like the module, please drop the author an email.
The latest version of this module can be found at http://y2038.googlecode.com/ and the repository is at
http://y2038.googlecode.com/svn/trunk/ in perl/Time-y2038. You have to check out the whole repository because there are symlinks.
AUTHOR
Michael G Schwern <schwern@pobox.com>
LICENSE & COPYRIGHT
Copyright 2008-2010 Michael G Schwern
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
See http://www.perl.com/perl/misc/Artistic.html
SEE ALSO
Time::y2038::Everywhere overrides localtime() and gmtime() across the whole program.
The y2038 project at http://y2038.googlecode.com/
<http://xkcd.com/376/>
perl v5.14.2 2011-11-15 Time::y2038(3pm)