Distribution of load Post: 302850911

Sponsored Content

Top Forums Shell Programming and Scripting Distribution of load Post 302850911 by summer_cherry on Friday 6th of September 2013 02:53:29 AM

09-06-2013

Registered User

hope below perl can help you some

Code:

my %overload;
my %idle;

sub handle{
	OUTER:
	foreach my $os (sort keys  %overload){
		foreach my $is (sort keys %idle){
			my $ol = $overload{$os};
			my $available = $idle{$is};
			if($available > $ol){
				print "$os ",$ol," can be done on $is\n";
				$idle{$is} = $available - $ol;
				delete $overload{$os};
				next OUTER;
			}
			elsif ($available == $ol){
				print "$os ",$ol," can be done on $is\n";
				delete $overload{$os};
				delete $idle{$is};
				next OUTER;
			}
			else{
				print "$os ",$available," can be done on $is\n";
				delete $idle{$is};
				$overload{$os} = $ol-$available;
				next;
			}
		}
	}
}

sub remain{
	my @ol = keys %overload;
	if($#ol>=0){
		print "Still have below to be accormodated\n";
		foreach(@ol){
			print $_,":",$overload{$_},"\n";
		}
	}
	
	my @id = keys %idle;
	if($#id>=0){
		print "Still have below idle\n";
		foreach(@id){
			print $_,":",$idle{$_},"\n";
		}
	}
}

while(<DATA>){
	chomp;
	my @arr = split("-",$_);
	@arr = map {s/\s+//g;$_} @arr;
	if($arr[1] eq 'OverLoad'){
		$overload{$arr[0]}=$arr[2];
	}
	else{
		$idle{$arr[0]} =  $arr[2];
	}		
}

handle();

remain();
__DATA__
Server1 - OverLoad - 252
Server2 - OverLoad - 431
Server3 - AcceptLoad - 550
Server4 - AcceptLoad - 59
Server5 - AcceptLoad - 224
Server6 - OverLoad - 1000

summer_cherry

View Public Profile for summer_cherry

Find all posts by summer_cherry

5 More Discussions You Might Find Interesting

1. UNIX for Advanced & Expert Users

could not load hme

After installing Solaris patches, i faced this problem which the system could not load hme ( network interface). after booting up the system i try to configure the IP add. on hme (ifconfig hme inet ......),but it fails. the /etc/hostname.hme0 file exists & is ok & in Prom mode also after running...

2. UNIX for Dummies Questions & Answers

Load error

hi i am facing a problem when i run a shell script to load a table.the error is Record 1: Rejected - Error on table TRENDS."SHP_CUST_ORD_ITM". ORA-14400: inserted partition key is beyond highest legal partition key Record 2: Rejected - Error on table TRENDS."SHP_CUST_ORD_ITM", column...

3. UNIX for Dummies Questions & Answers

load Balance

Guys im trying to create a script that will load ballance 3 devices. Unix is still very alien to me having only been in this position for 3 months now. Not to mention the fact that i've been thrown in the deep end. Anyway so far i've managed to make a script that looks at all 4 devices and make a...

4. Shell Programming and Scripting

Need help in wrting Load Script for a Load-Resume type of load.

hi all need your help. I am wrting a script that will load data into the table. then on another load will append the data into the existing table. Regards Ankit

5. UNIX for Dummies Questions & Answers

VPS has load 200, httpd load no activity, netstat nothing

Hello, on my hostserver i see one VPS of mine got load of 200.00 and netstat nothing (not a single blank line on netstat command) after some time, netstat started showing connections, but i see no excessive IP connections. tail -f /var/log/httpd/access_log shows no activity /var/log/messages ;...

LEARN ABOUT SUSE

mlm

FBB::mlm(3bobcat)                                             OFoldStream manipulator                                            FBB::mlm(3bobcat)

NAME

       FBB::mlm - Manipulator modifying left margins of OFoldStream objects

SYNOPSIS

       #include <bobcat/ofoldstream> or
       #include <bobcat/ofoldstreambuf>
       Linking option: -lbobcat

DESCRIPTION

       The  mlm  class  implements  a  manipulator that can be inserted into OFoldStream objects to modify the stream's left margin by a requested
       amount. The request cannot result in a negative left margin value. If a negative left margin would be the arithmetic result of the  request
       then left margin 0 will silently be used.

       Depending  on  the  tab-setting  of  the  OFoldStream  the  inserted value represents the number of blank space characters or the number of
       tab-characters that will be added to the left margin.

       The request will be processed at the next newline character or std::flush or std::endl manipulator that is inserted into the stream.  If  a
       line  is  still empty once an mlm object and a flush manipulator are inserted into the stream then the new left margin will be effective at
       the next word inserted into that line (cf., the example section below)

       A bad_cast exception is thrown when the manipulator is inserted into an ostream that is not using a OFoldStreambuf buffer.

NAMESPACE

       FBB
       All constructors, members, operators and manipulators, mentioned in this man-page, are defined in the namespace FBB.

INHERITS FROM

       -

CONSTRUCTOR

       o      mlm(int addValue):
              The standard copy constructor is available.

MEMBER FUNCTIONS

       There are no public or protected member functions in this class.

EXAMPLE

           #include <iostream>
           #include <bobcat/ofoldstream>

           using namespace std;
           using namespace FBB;

           int main()
           {
               OFoldStream out(cout, 0, 80);
               out << "hello world (left margin is 0)" << mlm(4) << "
"
                      "this uses a 4 character wide left margin
" <<
                       mlm(-10) << flush <<
                       "left margin -6 changed to 0, active on this line
";
               return 0;
           }

FILES

       bobcat/mlm - defines the class interface

SEE ALSO

       bobcat(7), manipulators(3bobcat), lm(3bobcat), ofoldstream(3bobcat)

BUGS

       None Reported.

DISTRIBUTION FILES

       o      bobcat_3.01.00-x.dsc: detached signature;

       o      bobcat_3.01.00-x.tar.gz: source archive;

       o      bobcat_3.01.00-x_i386.changes: change log;

       o      libbobcat1_3.01.00-x_*.deb: debian package holding the libraries;

       o      libbobcat1-dev_3.01.00-x_*.deb: debian package holding the libraries, headers and manual pages;

       o      http://sourceforge.net/projects/bobcat: public archive location;

BOBCAT

       Bobcat is an acronym of `Brokken's Own Base Classes And Templates'.

COPYRIGHT

       This is free software, distributed under the terms of the GNU General Public License (GPL).

AUTHOR

       Frank B. Brokken (f.b.brokken@rug.nl).

libbobcat1-dev_3.01.00-x.tar.gz                                      2005-2012                                                   FBB::mlm(3bobcat)