02-21-2010
Post your code
Speeding up a script is not usually very easy to do without major rewrites. If you post some of your code here, we can offer better advice.
10 More Discussions You Might Find Interesting
1. Filesystems, Disks and Memory
Hello,
I have a Supermicro server with a P4SCI mother board running Debian Sarge 3.1. This is the "dmidecode" output related to RAM info:
RAM speed information is incomplete.. "Current Speed: Unknown", is there anyway/soft to get the speed of installed RAM modules? thanks!!
Regards :)... (0 Replies)
Discussion started by: Santi
0 Replies
2. Shell Programming and Scripting
hi i have a script that is taking the difference of multiple columns in a file from a value from a single row..so far i have a loop to do that.. all the data is floating point..fin has the difference between array1 and array2..array1 has 700 x 300= 210000 values and array2 has 700 values..
... (11 Replies)
Discussion started by: npatwardhan
11 Replies
3. Shell Programming and Scripting
Hey together,
You should know, that I'am relatively new to shell scripting, so my solution is probably a little awkward.
Here is the script:
#!/bin/bash
live_dir=/var/lib/pokerhands/live
for limit in `find $live_dir/ -type d | sed -e s#$live_dir/##`; do
cat $live_dir/$limit/*... (19 Replies)
Discussion started by: lorus
19 Replies
4. Shell Programming and Scripting
I have a script that processes a fair amount of data -- say, 25-50 megs per run. I'd like ideas on speeding it up. The code is actually just a preprocessor -- I'm using another language to do the heavy lifting. But as it happens, the preprocessing takes much more time than the final processing... (3 Replies)
Discussion started by: CRGreathouse
3 Replies
5. Filesystems, Disks and Memory
I analysed disk performance with blktrace and get some data:
read:
8,3 4 2141 2.882115217 3342 Q R 195732187 + 32
8,3 4 2142 2.882116411 3342 G R 195732187 + 32
8,3 4 2144 2.882117647 3342 I R 195732187 + 32
8,3 4 2145 ... (1 Reply)
Discussion started by: W.C.C
1 Replies
6. Shell Programming and Scripting
I had written a perl script to compare two files: new and master and get the output of the first file i.e. the first file: words that are not in the master file
STRUCTURE OF THE TWO FILES
The first file is a series of names
ramesh
sushil
jonga
sudesh
lugdi
whereas the second file (could be... (4 Replies)
Discussion started by: gimley
4 Replies
7. Shell Programming and Scripting
Hi,
Im quite new to scripting and would like a bit of assistance with trying to speed up the following script. At the moment it is quite slow....
Any way to improve it?
total=111120
while
do
total=`expr $total + 1`
INCREMENT=$total
firstline = "blablabla"
secondline = "blablabla"... (5 Replies)
Discussion started by: brunlea
5 Replies
8. Shell Programming and Scripting
hey guys i have a perl script wich use to compare hashes but it tookes a long time to do that so i wich i will have the soulition to do it soo fast
he is the code
<redacted> (1 Reply)
Discussion started by: benga
1 Replies
9. Shell Programming and Scripting
Hi
I have written a shell script which will test 300 to 500 IPs to find which are pinging and which are not pinging.
the script which give output as
10.x.x.x is pining
10.x.x.x. is not pining
-
-
-
10.x.x.x is pining
like above.
But, this script is taking... (6 Replies)
Discussion started by: kumar85shiv
6 Replies
10. Shell Programming and Scripting
Hello,
I am basic level shell script developer. I have developed the following script. The shell script basically tracking various files containing certain strings. I am finding options to make the script run more faster. Any help/suggestion would be appreciated :)
#! /bin/bash
# Greps for... (6 Replies)
Discussion started by: Bhanuprasad
6 Replies
LEARN ABOUT DEBIAN
aspect::advice
Aspect::Advice(3pm) User Contributed Perl Documentation Aspect::Advice(3pm)
NAME
Aspect::Advice - Change how Perl code is run at a pointcut
SYNOPSIS
# Trace calls to all functions in all MyAccount classes
use Aspect;
before {
print 'Called: '. $_->sub_name;
} call qw/^MyAccount::/;
# Repeat using the pure object-oriented interface
use Aspect::Advice::Before ();
use Aspect::Pointcut::Call ();
my $advice = Aspect::Advice::Before->new(
pointcut => Aspect::Pointcut::Call->new( qr/^MyAccount::/ ),
code => sub {
print 'called: '. $_->sub_name;
},
);
DESCRIPTION
An "advice" in AOP lingo is composed of a condition (known as a Aspect::Pointcut) and some code that will run when that pointcut is true.
This code is run before, after, or around the target pointcut depending on the particular advice type declaration used.
You do not normally create advice using the constructor. By "use()"ing Aspect, you get five advice declaration subroutines imported.
"before" is used to indicate code that should run prior to the function being called. See Aspect::Advice::Before for more information.
"after" is used to indicate code that should run following the function being called, regardless of whether it returns normally or throws
an exception. See Aspect::Advice::After for more information.
"around" is used to take deeper control of the call and gives you your own lexical scope between the caller and callee, with a specific
"proceed" call required in your code to execute the target function. See Aspect::Advice::Around for more information.
When the advice code is called, it is provided with an Advice::Point object which describes the context of the call to the target function,
and allows you to change it.
This parameter is provided both via the topic variable $_ (since version 0.90) and additionally as the first parameter to the advice code
(which may be deprecated at some point in the future).
If you are creating "advice" objects directly via the OO interface, you should never use this class directly but instead use the class of
the particular type of advice you want to create.
AUTHORS
Adam Kennedy <adamk@cpan.org>
Marcel Gruenauer <marcel@cpan.org>
Ran Eilam <eilara@cpan.org>
COPYRIGHT
Copyright 2001 by Marcel Gruenauer
Some parts copyright 2009 - 2012 Adam Kennedy.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.14.2 2012-02-01 Aspect::Advice(3pm)