08-03-2005
It does exactly what those commands do. Just that we dont have GNU 'date' and aren't allowed to install that either. So I came up with this. Just that the extreme cases like a difference of 100000 days takes a lot of time. Here is the output of uname -a:
SunOS xxxxxxx 5.8 Generic_117350-24 sun4u sparc SUNW,Ultra-Enterprise
There is almost no load on the server (uptime reports 0.06...).
Here are some 'time' command outputs for my script.
# time ./tonfro.sh 100
2005-11-11
real 0m0.31s
user 0m0.08s
sys 0m0.20s
# time ./tonfro.sh 10000
2032-12-19
real 0m7.84s
user 0m2.49s
sys 0m4.81s
# time ./tonfro.sh 100000
2279-05-19
real 1m16.19s
user 0m23.08s
sys 0m47.55s
--EDIT--
Is $() valid in sh? I am not using ksh. Also, assuming it is valid, will it run any faster than expr?
--/EDIT
Last edited by blowtorch; 08-03-2005 at 03:04 AM..
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hi all,
Still a newbie and learning as I go ... as you do :)
Have created this script to report on disc usage and I've just included the ChkSpace function this morning.
It's the first time I've read a file (line-by-bloody-line) and would like to know if I can improve this script ?
FYI - I... (11 Replies)
Discussion started by: Cameron
11 Replies
2. UNIX for Dummies Questions & Answers
hi someone tell me which ways i can improve disk I/O and system process performance.kindly refer some commands so i can do it on my test machine.thanks, Mazhar (2 Replies)
Discussion started by: mazhar99
2 Replies
3. IP Networking
I have a 10Gbps network link connecting two machines A and B. I want to transfer 20GB data from A to B using TCP. With default setting, I can use 50% bandwidth. How to improve the throughput? Is there any way to make throughput as close to 10Gbps as possible? thanks~ :) (3 Replies)
Discussion started by: andrewust
3 Replies
4. AIX
I just wrote a very small script that improves readability on system sulog. The problem with all sulog is there is lack of clarity whether the info you are looking at is the most current. So if you just need a simple soution instead of going thru the trouble of writing a script that rotate logs and... (0 Replies)
Discussion started by: sparcguy
0 Replies
5. UNIX for Dummies Questions & Answers
Hi ,
i wrote a script to convert dates to the formate i want .it works fine but the conversion is tkaing lot of time . Can some one help me tweek this script
#!/bin/bash
file=$1
ofile=$2
cp $file $ofile
mydates=$(grep -Po '+/+/+' $ofile) # gets 8/1/13
mydates=$(echo "$mydates" | sort |... (5 Replies)
Discussion started by: vikatakavi
5 Replies
6. Shell Programming and Scripting
Dear all,
I have written two scripts to transfer files to another server outside the company.
One is a batch script , and the other script calls the batch script, send the files and archive the file sent.
The problem is, that I want to get the list of files which have been uploaded the the... (10 Replies)
Discussion started by: arrals_vl
10 Replies
7. Shell Programming and Scripting
Gents.
I have 2 different scripts for the same purpose:
raw2csv_1
Script raw2csv_1 finish the process in less that 1 minute
raw2csv_2
Script raw2csv_2 finish the process in more that 6 minutes.
Can you please check if there is any option to improve the raw2csv_2. To finish the job... (4 Replies)
Discussion started by: jiam912
4 Replies
8. Programming
Hello,
Attached is my very simple C++ code to remove any substrings (DNA sequence) of each other, i.e. any redundant sequence is removed to get unique sequences. Similar to sort | uniq command except there is reverse-complementary for DNA sequence. The program runs well with small dataset, but... (11 Replies)
Discussion started by: yifangt
11 Replies
9. Shell Programming and Scripting
Gents,
Is there the possibility to improve this script to be able to have same output information.
I did this script, but I believe there is a very short code to get same output
here my script
awk -F, '{if($10>0 && $10<=15) print $6}' tmp1 | sort -k1n | awk '{a++} END { for (n in a )... (23 Replies)
Discussion started by: jiam912
23 Replies
10. OS X (Apple)
Hi everyone!
This is my first post here, I hope that I will not already be violating any rule! I also would like to apologize in advance as my post will definitely be a noob post... please have patience and faith :rolleyes:!
Now that I have set the ground rules :D:D, my objective is trying... (39 Replies)
Discussion started by: Ardzii
39 Replies
RRDp(3) User Contributed Perl Documentation RRDp(3)
NAME
RRDp - Attach RRDtool from within a perl script via a set of pipes;
SYNOPSIS
use RRDp
RRDp::start path to RRDtool executable
RRDp::cmd rrdtool commandline
$answer = RRD::read
$status = RRD::end
$RRDp::user, $RRDp::sys, $RRDp::real, $RRDp::error_mode, $RRDp::error
DESCRIPTION
With this module you can safely communicate with the RRDtool.
After every RRDp::cmd you have to issue an RRDp::read command to get RRDtools answer to your command. The answer is returned as a pointer,
in order to speed things up. If the last command did not return any data, RRDp::read will return an undefined variable.
If you import the PERFORMANCE variables into your namespace, you can access RRDtool's internal performance measurements.
use RRDp
Load the RRDp::pipe module.
RRDp::start path to RRDtool executable
start RRDtool. The argument must be the path to the RRDtool executable
RRDp::cmd rrdtool commandline
pass commands on to RRDtool. Check the RRDtool documentation for more info on the RRDtool commands.
Note: Due to design limitations, RRDp::cmd does not support the "graph -" command - use "graphv -" instead.
$answer = RRDp::read
read RRDtool's response to your command. Note that the $answer variable will only contain a pointer to the returned data. The
reason for this is, that RRDtool can potentially return quite excessive amounts of data and we don't want to copy this around in
memory. So when you want to access the contents of $answer you have to use $$answer which dereferences the variable.
$status = RRDp::end
terminates RRDtool and returns RRDtool's status ...
$RRDp::user, $RRDp::sys, $RRDp::real
these variables will contain totals of the user time, system time and real time as seen by RRDtool. User time is the time RRDtool
is running, System time is the time spend in system calls and real time is the total time RRDtool has been running.
The difference between user + system and real is the time spent waiting for things like the hard disk and new input from the Perl
script.
$RRDp::error_mode and $RRDp::error
If you set the variable $RRDp::error_mode to the value 'catch' before you run RRDp::read a potential ERROR message will not cause
the program to abort but will be returned in this variable. If no error occurs the variable will be empty.
$RRDp::error_mode = 'catch';
RRDp::cmd qw(info file.rrd);
print $RRDp::error if $RRDp::error;
EXAMPLE
use RRDp;
RRDp::start "/usr/local/bin/rrdtool";
RRDp::cmd qw(create demo.rrd --step 100
DS:in:GAUGE:100:U:U
RRA:AVERAGE:0.5:1:10);
$answer = RRDp::read;
print $$answer;
($usertime,$systemtime,$realtime) = ($RRDp::user,$RRDp::sys,$RRDp::real);
SEE ALSO
For more information on how to use RRDtool, check the manpages.
AUTHOR
Tobias Oetiker <tobi@oetiker.ch>
perl v5.12.1 2010-03-22 RRDp(3)