Computers: January 2007 Archives

Pats by 24

| | Comments (0)
In my previous entry about the Pats, I should have factored in the Jets.

You see, the Pats three biggest rivals under Brady and Belichick have been who? The Steelers, Colts, and Jets. And every playoff game under B/B in years they went to the AFC Championship were won by three points except for games against their rivals, which were won by 7, 10, 14, 17, and 21.

So, Pats by 24.

I am probably the only one making that prediction. But if I am right, I will have bragging rights for time immemorial.

Oh, and also, everyone is still picking the Colts. For the same reason: they are "due." Yeah, they were due in '04 too, and they lost by 17. They might win, but it won't be because they are "due." use.perl.org

Pickin' the Pats

| | Comments (0)
Last week, I heard only two people on TV pick the Pats, and both were named Boomer: Berman and Esiason.

This week, I don't know about Esiason, but Boomer is the only one I've heard so far pick the Pats again. Everyone else has picked the Colts.

Works for me. use.perl.org
Ovid had a code snippet for opening a new terminal window in the current Terminal directory. It was in AppleScript, and because it's what I do, I rewrote it in Mac::Glue, and also rewrote it to work in iTerm, whch is what I use.

I have for awhile wanted something similar for the Finder, but never got around to it. That is, open a terminal for whatever Finder window I am in. So ... here it is.

#!/usr/bin/perl
#
# Open a new terminal in the Finder cwd
#
 
use Mac::Files;
use Mac::Glue ':all';
 
my $finder = new Mac::Glue 'Finder';
my $cwd = $finder->prop(target => window => 1)->get(as => 'alias');
$cwd ||= FindFolder(kUserDomain, kDesktopFolderType); # default to Desktop
$cwd =~ s/'/'\\''/g;
 
my $iterm = new Mac::Glue 'iTerm';
$iterm->activate;
my $term = $iterm->make(new => 'terminal');
$term->Launch(session => 'default');
$term->obj(session => 1)->write(text => "cd '$cwd'");

If you want to use Terminal, replace the lines about iTerm with these:

my $term = new Mac::Glue 'Terminal';
$term->do_script(with_command => "cd '$cwd'");

use.perl.org

Houston

| | Comments (0)
In regards to YAPC::Houston, and the summer I spent there 15 years ago, I am reminded of the Chagall Guevara song "Take Me Back (To Love Canal)," which has the wonderful lyric:

Come on, little baby, you'll like it up there
The wide open space and the big blue air
You'd be surprised what you can get used to
When your only other choice is Houston


use.perl.org

Mac-Glue-1.30 Released

| | Comments (0)
Mac-Glue-1.30 has been released. Download it from the CPAN or SF.net.

(Note: it may take time for the release to propagate to the various download mirrors.)
Changes:

* v1.30, Wednesday, January 3, 2007
 
   Dynamically load application's scripting additions before sending event.

Posted using release by brian d foy.

use.perl.org

Mac-Apps-Launch-1.93 Released

| | Comments (0)
Mac-Apps-Launch-1.93 has been released. Download it from the CPAN or SF.net.

(Note: it may take time for the release to propagate to the various download mirrors.)
Changes:

* v1.93, Wednesday, January 3, 2007
 
   Bundle IDs can have non-alpha chars.

Posted using release by brian d foy. use.perl.org
<pudge/*> (pronounced "PudgeGlob") is thousands of posts over many years by Pudge.

"It is the common fate of the indolent to see their rights become a prey to the active. The condition upon which God hath given liberty to man is eternal vigilance; which condition if he break, servitude is at once the consequence of his crime and the punishment of his guilt."

About this Archive

This page is a archive of entries in the Computers category from January 2007.

Computers: December 2006 is the previous archive.

Computers: February 2007 is the next archive.

Find recent content on the main index or look in the archives to find all content.