<?xml version="1.0" encoding="UTF-8"?>
<rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:wfw="http://wellformedweb.org/CommentAPI/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
	xmlns:slash="http://purl.org/rss/1.0/modules/slash/"
	>

<channel>
	<title>Sandon Jurowski</title>
	<atom:link href="http://jurowski.com/blog/?feed=rss2" rel="self" type="application/rss+xml" />
	<link>http://jurowski.com/blog</link>
	<description>Programming Notes</description>
	<lastBuildDate>Thu, 13 May 2010 15:03:15 +0000</lastBuildDate>
	<generator>http://wordpress.org/?v=2.9.2</generator>
	<language>en</language>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
			<item>
		<title>Perl script to display files in a folder (and delete them) via HTML</title>
		<link>http://jurowski.com/blog/?p=11</link>
		<comments>http://jurowski.com/blog/?p=11#comments</comments>
		<pubDate>Mon, 16 Jun 2008 16:47:46 +0000</pubDate>
		<dc:creator>sgj700</dc:creator>
				<category><![CDATA[bash and perl]]></category>

		<guid isPermaLink="false">http://jurowski.com/blog/?p=11</guid>
		<description><![CDATA[Perl script to display files in a folder (and delete them) via HTML

Place this code into an &#8220;index.cgi&#8221; file, and open that file in a browser:
#!/usr/bin/perl
$dir = &#8220;&#60;absolute path to the directory you&#8217;d like to see contents of&#62;&#8221;;
$folder = &#8220;http://&#60;your web server path to that directory&#62;&#8221;;
use CGI; # load the CGI.pm module
my $GET = new [...]]]></description>
		<wfw:commentRss>http://jurowski.com/blog/?feed=rss2&amp;p=11</wfw:commentRss>
		<slash:comments>1</slash:comments>
		</item>
		<item>
		<title>ruby on rails Quick Reference page</title>
		<link>http://jurowski.com/blog/?p=9</link>
		<comments>http://jurowski.com/blog/?p=9#comments</comments>
		<pubDate>Tue, 27 May 2008 01:45:12 +0000</pubDate>
		<dc:creator>sgj700</dc:creator>
				<category><![CDATA[Uncategorized]]></category>

		<guid isPermaLink="false">http://jurowski.com/blog/?p=9</guid>
		<description><![CDATA[Check out the new Ruby on Rails Quick Reference Page (exported from OmniOutliner Pro)
]]></description>
		<wfw:commentRss>http://jurowski.com/blog/?feed=rss2&amp;p=9</wfw:commentRss>
		<slash:comments>0</slash:comments>
		</item>
		<item>
		<title>auto-manage your mailman list memberships via Active Directory groups</title>
		<link>http://jurowski.com/blog/?p=8</link>
		<comments>http://jurowski.com/blog/?p=8#comments</comments>
		<pubDate>Sun, 25 May 2008 14:28:28 +0000</pubDate>
		<dc:creator>sgj700</dc:creator>
				<category><![CDATA[Uncategorized]]></category>

		<guid isPermaLink="false">http://jurowski.com/blog/?p=8</guid>
		<description><![CDATA[PROBLEM
Recently we found ourselves in a situation where an Exchange 2003 email distribution list won&#8217;t work for our &#8220;faculty@&#8221; and &#8220;all@&#8221; lists because:

non-Active Directory-account-holding people outside of our Exchange organization needed to contact the list on occasion
Our Exchange Users (doctors) would occasionally need to get an email through to colleagues ASAP, OFF-HOURS, and waiting for [...]]]></description>
		<wfw:commentRss>http://jurowski.com/blog/?feed=rss2&amp;p=8</wfw:commentRss>
		<slash:comments>0</slash:comments>
		</item>
		<item>
		<title>postfix Bash Script: Release &#8220;n&#8221; emails from hold</title>
		<link>http://jurowski.com/blog/?p=7</link>
		<comments>http://jurowski.com/blog/?p=7#comments</comments>
		<pubDate>Sun, 25 May 2008 13:51:38 +0000</pubDate>
		<dc:creator>sgj700</dc:creator>
				<category><![CDATA[Uncategorized]]></category>
		<category><![CDATA[postfix bash script release emails]]></category>

		<guid isPermaLink="false">http://jurowski.com/blog/?p=7</guid>
		<description><![CDATA[#!/bin/bash
#release_n_emails_from_hold.sh
ls /var/spool/postfix/hold/ &#62; /tmp/hold
COUNTER=0
RELEASE_MAX=10 #modify me as needed
RELEASED_N=0
for l in `cat /tmp/hold` ; do
if [  $COUNTER -lt $RELEASE_MAX ]; then
echo Unholding $l
let RELEASED_N=RELEASED_N+1
fi
let COUNTER=COUNTER+1
done
echo There were $COUNTER emails in the hold que. We released $RELEASED_N
]]></description>
		<wfw:commentRss>http://jurowski.com/blog/?feed=rss2&amp;p=7</wfw:commentRss>
		<slash:comments>0</slash:comments>
		</item>
		<item>
		<title>Perl Script to restart MailScanner if emails in the que are too high</title>
		<link>http://jurowski.com/blog/?p=6</link>
		<comments>http://jurowski.com/blog/?p=6#comments</comments>
		<pubDate>Sun, 25 May 2008 13:40:08 +0000</pubDate>
		<dc:creator>sgj700</dc:creator>
				<category><![CDATA[Uncategorized]]></category>
		<category><![CDATA[perl mailscanner script email]]></category>

		<guid isPermaLink="false">http://jurowski.com/blog/?p=6</guid>
		<description><![CDATA[#!/usr/bin/perl
use strict;
use warnings;
my $high = 200;
my $string = `postqueue -p&#124;grep &#8221; Requests.&#8221;`;
my $length_string = length $string;
my $start_string = index($string, &#8216; in &#8216;)+4;
my $end_string = index($string, &#8216; Requests.&#8217;);
my $fragment = substr $string, $start_string, ($end_string-$start_string);
if ($fragment &#62; $high) {
print &#8220;que of $fragment above threshold of $high.\n&#8221;;
system(&#8216;postqueue -p&#8217;);
system(&#8217;service MailScanner restart&#8217;);
} else {
print &#8220;que of $fragment is fine.\n&#8221;;
}
#exec(&#8216;postqueue -p&#124;grep [...]]]></description>
		<wfw:commentRss>http://jurowski.com/blog/?feed=rss2&amp;p=6</wfw:commentRss>
		<slash:comments>0</slash:comments>
		</item>
	</channel>
</rss>
