Last active
December 15, 2015 10:39
Revisions
-
justingit revised this gist
Mar 26, 2013 . 1 changed file with 6 additions and 4 deletions.There are no files selected for viewing
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters. Learn more about bidirectional Unicode charactersOriginal file line number Diff line number Diff line change @@ -1,19 +1,21 @@ #!/usr/bin/perl my $list = 'test'; my $verbose = 1; my $test = 1; use CGI::Carp qw(fatalsToBrowser); use FindBin; use lib "$FindBin::Bin/../"; use lib "$FindBin::Bin/../DADA/perllib"; use DADA::MailingList::Settings; my $ls = DADA::MailingList::Settings->new({-list => $list}); do "bridge.cgi"; use CGI qw(:standard); print header(); -
justingit created this gist
Mar 26, 2013 .There are no files selected for viewing
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters. Learn more about bidirectional Unicode charactersOriginal file line number Diff line number Diff line change @@ -0,0 +1,99 @@ #!/usr/bin/perl use CGI::Carp qw(fatalsToBrowser); use FindBin; use lib "$FindBin::Bin/../"; use lib "$FindBin::Bin/../DADA/perllib"; use DADA::MailingList::Settings; my $ls = DADA::MailingList::Settings->new({-list => 'test'}); do "bridge.cgi"; my $verbose = 1; my $test = 1; use CGI qw(:standard); print header(); print '<pre>'; my $msg = q{Return-path: <[email protected]> Envelope-to: [email protected] Delivery-date: Mon, 11 Mar 2013 14:38:35 -0600 Received: from schedmdc by box663.bluehost.com with local-bsmtp (Exim 4.80) (envelope-from <[email protected]>) id 1UF9UR-0005Sp-2L for [email protected]; Mon, 11 Mar 2013 14:38:35 -0600 X-Spam-Checker-Version: SpamAssassin 3.3.1 (2010-03-16) on box663.bluehost.com X-Spam-Level: X-Spam-Status: No, score=-3.6 required=3.0 tests=ALL_TRUSTED,AWL,BAYES_00 shortcircuit=no autolearn=ham version=3.3.1 Received: from [127.0.0.1] (port=53173 helo=localhost) by box663.bluehost.com with esmtpsa (TLSv1:CAMELLIA256-SHA:256) (Exim 4.80) (envelope-from <[email protected]>) id 1UF9UQ-0005SD-Rk; Mon, 11 Mar 2013 14:38:34 -0600 Received: from 75.0.184.128 ([75.0.184.128]) by mail.schedmd.com (Horde Framework) with HTTP; Mon, 11 Mar 2013 14:38:34 -0600 Message-ID: <[email protected]> Date: Mon, 11 Mar 2013 14:38:34 -0600 From: Moe Jette <[email protected]> To: test-list <[email protected]>, Someone Else <[email protected]> Subject: Re: [slurm-dev] Cosmetic fixes for init.d scripts References: <CA+Y5xYf3y=x9VCeRbAvb9vdqvNzrKnDdihAfa51ChD=Fkvj3PA@mail.gmail.com> In-Reply-To: <CA+Y5xYf3y=x9VCeRbAvb9vdqvNzrKnDdihAfa51ChD=Fkvj3PA@mail.gmail.com> MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8; DelSp="Yes"; format="flowed" Content-Disposition: inline Content-Transfer-Encoding: 7bit User-Agent: Internet Messaging Program (IMP) H3 (4.3.11) X-Identified-User: {2482:box663.bluehost.com:schedmdc:schedmd.com} {sentby:smtp auth 127.0.0.1 authed with [email protected]} X-Identified-User: {2482:box663.bluehost.com:schedmdc:schedmd.com} {sentby:spamassassin for local delivery to identified user} This patch has been applied to the version 2.6 code. Thank you! Quoting Dmitri Gribenko <[email protected]>: > Hello, > > Please find attached a patch with two fixes for init.d scripts: > > * correct comments (full path to slurm binaries was not correct in comments); > > * improve the output of 'service [slurm|slurmdbd] reconfig'. It used > to garble the console because of the missing 'echo' after 'killproc'. > '[OK]' was displayed on the same line as the shell prompt in CentOS > 6.4. Now it looks correctly: > > [root@head ~]# service slurm reconfig > Reloading slurmctld daemon configuration: [ OK ] > [root@head ~]# > > Please review and apply. > > Dmitri > > -- > main(i,j){for(i=2;;i++){for(j=2;j<i;j++){if(!(i%j)){j=0;break;}}if > (j){printf("%d\n",i);}}} /*Dmitri Gribenko <[email protected]>*/ > }; my ($status, $errors) = bridge::inject( { -ls => $ls, -msg => $msg, -verbose => $verbose, -test_mail => $test, }); use Data::Dumper; print Dumper([($status, $errors)]); print "done!";