Date: Wed, 8 Aug 2001 00:16:46 -0500 From: Mike Meyer <mwm@mired.org> To: "Graham White" <gawhite7@home.com> Cc: questions@freebsd.org Subject: Re: Perl Script Message-ID: <15216.52030.274217.805309@guru.mired.org> In-Reply-To: <26247968@toto.iv>
next in thread | previous in thread | raw e-mail | index | archive | help
Graham White <gawhite7@home.com> types: > This is a multi-part message in MIME format. > > ------=_NextPart_000_0014_01C11F81.BCE87E00 > Content-Type: text/plain; > charset="iso-8859-1" > Content-Transfer-Encoding: 7bit > > Does anyone have an example of a Perl script that constantly loops and > checks the loadaverage of a machine, if the loadaverage is over a > certain amount then it will stop and restart a program or program(s) ? > Thanks Gods, man - look at all the crap your mailer added to this simple question! That's the argument I've seen for why sending both HTML and plain text is discouraged on -questions. > ------=_NextPart_000_0014_01C11F81.BCE87E00 > Content-Type: text/html; > charset="iso-8859-1" > Content-Transfer-Encoding: quoted-printable > > <html xmlns:o=3D"urn:schemas-microsoft-com:office:office" = > xmlns:w=3D"urn:schemas-microsoft-com:office:word" = > xmlns=3D"http://www.w3.org/TR/REC-html40">; > > <head> > <META HTTP-EQUIV=3D"Content-Type" CONTENT=3D"text/html; = > charset=3Diso-8859-1"> > > > <meta name=3DProgId content=3DWord.Document> > <meta name=3DGenerator content=3D"Microsoft Word 10"> > <meta name=3DOriginator content=3D"Microsoft Word 10"> > <link rel=3DFile-List href=3D"cid:filelist.xml@01C11F81.BC141700"> > <!--[if gte mso 9]><xml> > <o:OfficeDocumentSettings> > <o:DoNotRelyOnCSS/> > </o:OfficeDocumentSettings> > </xml><![endif]--><!--[if gte mso 9]><xml> > <w:WordDocument> > <w:SpellingState>Clean</w:SpellingState> > <w:GrammarState>Clean</w:GrammarState> > <w:DocumentKind>DocumentEmail</w:DocumentKind> > <w:EnvelopeVis/> > <w:Compatibility> > <w:UseFELayout/> > </w:Compatibility> > <w:BrowserLevel>MicrosoftInternetExplorer4</w:BrowserLevel> > </w:WordDocument> > </xml><![endif]--> > <style> > <!-- > /* Font Definitions */ > @font-face > {font-family:Batang; > panose-1:2 3 6 0 0 1 1 1 1 1; > mso-font-alt:\BC14\D0D5; > mso-font-charset:129; > mso-generic-font-family:roman; > mso-font-pitch:variable; > mso-font-signature:-1342176593 1775729915 48 0 524447 0;} > @font-face > {font-family:"\@Batang"; > panose-1:2 3 6 0 0 1 1 1 1 1; > mso-font-charset:129; > mso-generic-font-family:roman; > mso-font-pitch:variable; > mso-font-signature:-1342176593 1775729915 48 0 524447 0;} > /* Style Definitions */ > p.MsoNormal, li.MsoNormal, div.MsoNormal > {mso-style-parent:""; > margin:0cm; > margin-bottom:.0001pt; > mso-pagination:widow-orphan; > font-size:12.0pt; > font-family:"Times New Roman"; > mso-fareast-font-family:Batang; > mso-ansi-language:EN-CA;} > a:link, span.MsoHyperlink > {color:blue; > text-decoration:underline; > text-underline:single;} > a:visited, span.MsoHyperlinkFollowed > {color:purple; > text-decoration:underline; > text-underline:single;} > span.EmailStyle17 > {mso-style-type:personal-compose; > mso-style-noshow:yes; > mso-ansi-font-size:10.0pt; > mso-bidi-font-size:10.0pt; > font-family:Arial; > mso-ascii-font-family:Arial; > mso-hansi-font-family:Arial; > mso-bidi-font-family:Arial; > color:windowtext;} > span.SpellE > {mso-style-name:""; > mso-spl-e:yes;} > span.GramE > {mso-style-name:""; > mso-gram-e:yes;} > @page Section1 > {size:612.0pt 792.0pt; > margin:72.0pt 90.0pt 72.0pt 90.0pt; > mso-header-margin:35.4pt; > mso-footer-margin:35.4pt; > mso-paper-source:0;} > div.Section1 > {page:Section1;} > --> > </style> > <!--[if gte mso 10]> > <style> > /* Style Definitions */=20 > table.MsoNormalTable > {mso-style-name:"Table Normal"; > mso-tstyle-rowband-size:0; > mso-tstyle-colband-size:0; > mso-style-noshow:yes; > mso-style-parent:""; > mso-padding-alt:0cm 5.4pt 0cm 5.4pt; > mso-para-margin:0cm; > mso-para-margin-bottom:.0001pt; > mso-pagination:widow-orphan; > font-size:10.0pt; > font-family:"Times New Roman";} > </style> > <![endif]--> > </head> > > <body lang=3DEN-US link=3Dblue vlink=3Dpurple = > style=3D'tab-interval:36.0pt'> > > <div class=3DSection1> > > <p class=3DMsoNormal><font size=3D2 face=3DArial><span = > style=3D'font-size:10.0pt; > font-family:Arial;mso-ansi-language:EN-US'>Does anyone have an example = > of a <span > class=3DSpellE>Perl</span> script that constantly loops and checks the = > <span > class=3DSpellE>loadaverage</span> of a machine<span class=3DGramE>,<span > style=3D'mso-spacerun:yes'>=A0 </span>if</span> the <span = > class=3DSpellE>loadaverage</span> > is over a certain amount then it will stop and restart a program or = > program(s) ? > Thanks<o:p></o:p></span></font></p> > > </div> > > </body> > > </html> > > ------=_NextPart_000_0014_01C11F81.BCE87E00-- > Now, to answer the question. If you have a background computing task you'd like to stop under those conditions, have it exit and requeue itself via the batch command. If the idea is to control access to some service, you can either use batch to do something to close access, or integrate it into the service properly. If the problem is some program that's going crazy and chewing up to much CPU, you should fix the program in question, or use nice on it. <mike -- Mike Meyer <mwm@mired.org> http://www.mired.org/home/mwm/ Independent WWW/Perforce/FreeBSD/Unix consultant, email for more information. To Unsubscribe: send mail to majordomo@FreeBSD.org with "unsubscribe freebsd-questions" in the body of the message
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?15216.52030.274217.805309>