Brainspill

Wow, some news strikes closer to home than others. Yahoo! News – Ala. Judge Wears Ten Commandments on Robe.

I’ve actually met this judge. We didn’t share a conversation or anything – he was at my father-in-law’s funeral and we shook hands at the visitation. I do know his son, though – went hunting with him this past Thanksgiving trip. Nice guy. For privacy’s sake, I’ll call him Bob. 🙂

And here’s a demonstration in upbringing and respect… Bob has seen me make a complete ass of myself at a highschool baseball game. I was heckling the home team while my (wife’s) cousins were on the visiting team in Florala, AL. The home team had been harrassing our batters, nobody else was giving anything back, so I decided I would.

So here’s this yankee, yelling with a fake french accent, “Shake that thing for meee… Oh yes! I like it VERY good!” “You’re Zeeper is down, you know. I like eeet!” etc. It horrified our aunt. It helped our team though – the home team’s scoring slowed down, and ours picked up. If only I’d started earlier in the game, we might’ve won.

Bob, like most other people sitting around me (including my wife), was both laughing, and keeping his distance – not wanting to be collateral damage when the Florala folks lost their southern hospitality and came after me.

And then… 4 months later on my next trip down… had the gall to call me “Sir”. Maybe I look old. Maybe he forgot about that May baseball game by November. But I think it’s more likely he’s been raised well, respects his elders – even if they’ve been public morons – and his parents have done a pretty darn good job raising him.

And that’s the sum of my experience with this judge in Covington County, Alabama. And combined with the fact that I agree with what he’s doing anyway, it’s more than enough for me to give him my respect and support.

I hope he’s getting other positive support, in contrast to the negative discouragement I know he’s getting. This is my display of it.

My wife wrote me recently that Wal-mart is a Humbug. Mostly, she was upset with a shopping experience during the holiday season. A cashier had been inefficient, and in the same week, the portrait studio made us wait an hour before we left in disgust over the delay past our appointment time.

Her pledge not to shop there ever again lasted exactly 4 days. One trip through the local competitor’s checkout lane and she decided a clean store and lower prices were more important that her grudge.

We decided together that this quote from Herman Wouk’s Caine Mutiny also applies at Wal-mart:

“The Navy is a master plan designed by geniuses for execution by idiots. If you’re not an idiot, but find yourself in the Navy, you can only operate well by pretending to be one. All the shortcuts and economies and common-sense changes that your native intelligence suggests to you are mistakes. Learn to quash them. Constantly ask yourself, ‘How would I do this if I were a fool?’ Throttle down your mind to a crawl. Then you’ll never go wrong.”

But in reflection, I think they’re more than a Humbug. I think they’re quite possibly one of the infamous Four (Five?) Horseman of the Apocalypse, foretold in the book of Revelations.

I looked, and there before me was an inexpensive horse! Its rider was named Wal-Mart, and Sam’s Club was following close behind him. They were given power over a fourth of the earth to kill by low prices, gift cards and cheap gas, and by the happy bouncing smiley face logo.

I’ve bought whole-heartedly into the cash-less society they offer. I don’t need to carry cash through the week anymore. I fill up my Wal-Mart gift card dutifully every weekend and buy the cheapest gas around during my weekly commute – either at Wal-mart, or Sam’s Club.

I don’t have to write checks at their checkout lines anymore. I just swipe my ATM card — which was never specifically imbued with debit card power by my election — and poof, transaction complete, have a nice day!

And most unsettling: I like it.

I could shop at Cabela’s 30 miles away, but the prices are outrageous there. Wal-mart has the same hunting stuff I drool over, but much cheaper.

I could get my groceries at the cute little grocery store I was so taken with, before Wal-Mart expanded… but I can also get so much more at Wal-Mart… and if not the same brands, certainly better prices.

I could shell out 3 figures for family photos, but wow… There’s a portrait studio right inside the store — And vision care — And a pharmacy — And a cafeteria with Mmmm, good cinnamon rolls!

I’ll have to watch myself, so that I don’t go clammer to be in line when they offer payment by hand or forehead scan.

A nearby town is organizing a drive to keep Wal-Mart outside of their borders. Resistance is not quite futile, as other cities have won similar fights, but what does it matter? I pass 5 Wal-Marts and 2 Sam’s Clubs between my home and work. Doesn’t everyone? Still, a quiet voice wishes the town luck… Because when I’m not shopping right along to the piped in tv music overhead in the stores, and when the gas tank isn’t empty… that place looks to me like it’s been prophesied for a long, long time.

(er, please, Wal-Mart: don’t sue me. It’s humor. Mostly.)

ASP (VBScript) does string concatenation (joining) with the ampersand (&). It’s a bad performer. I’ve heard that for years. I never really understood how or why.

Marcus Tucker exposes why in the best description of the issue I’ve read.

And since I’ll probably use this again somewhere, here’s his String Concatenation class.

'-------------------------------------------
'String concatenation class (using an array)
'-------------------------------------------
'Written by Marcus Tucker, July 2004
'http://marcustucker.com
'-------------------------------------------
Class StrConCatArray
	Private StringCounter
	Private StringArray()
	Private StringLength
	
	'called at creation of instance
	Private Sub Class_Initialize()
		StringCounter = 0
		InitStringLength = 128
		ReDim StringArray(InitStringLength - 1)
		StringLength = InitStringLength
	End Sub
	
	Private Sub Class_Terminate()
		Erase StringArray
	End Sub

	'add new string to array
	Public Sub Add(byref NewString)
		StringArray(StringCounter) = NewString
		StringCounter = StringCounter + 1
		
		'ReDim array if necessary
		If StringCounter MOD StringLength = 0 Then
			'redimension
			ReDim Preserve StringArray(StringCounter + StringLength - 1)
			
			'double the size of the array next time
			StringLength = StringLength * 2
		End If
	End Sub
	
	'return the concatenated string
	Public Property Get Value
		Value = Join(StringArray, "")
	End Property 
	
	'resets array
	Public Function Clear()
		StringCounter = 0
		
		Redim StringArray(InitStringLength - 1)
		StringLength = InitStringLength
	End Function		
End Class