This file contains 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 characters
# via http://blog.zerosum.org/2011/03/02/better-aws-access-control-with-iam-and-fog.html | |
require 'fog' | |
username = 'testuser' | |
bucket = 'uniquebucketname1234' | |
aws_credentials = { | |
:aws_access_key_id => 'YOUR-ACCESS-KEY-ID', | |
:aws_secret_access_key => 'YOUR-SECRET-ACCESS-KEY' |
This file contains 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 characters
Next month, I'd like to finally kick off OpenHack Pittsburgh. OpenHack is an | |
initiative started by the Western NY Ruby Users Group to create a regularly | |
meeting, globally branded hacking event. The exact structure of OpenHack varies | |
by city, but the basic purpose is coding together. You can learn more at the | |
website - http://openhack.github.com/ | |
You're receiving this email because you have either expressed interest in | |
OpenHack or have a hand in organizing a technology user group in Pittsburgh. | |
This is a polyglot event, and I want to be sure each user group is represented | |
and that the scheduling for OpenHack doesn't conflict with other events. If |
This file contains 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 characters
#!/bin/sh | |
# Print four lines showing blocks of colors: 0-7 | 0-7bold | 8-15 | 8-15bold | |
perl -CADS -lwe ' | |
my $block = shift || (chr(0x2588) x 3); | |
for (["", 0], ["1;", 0], ["", 8], ["1;", 8]) { | |
my ($bold, $offset) = @$_; | |
my @range = map $offset + $_, 0..7; | |
printf "%s %-6s ", $bold ? "bold" : "norm", "$range[0]-$range[-1]"; | |
print map("\e[${bold}38;5;${_}m$block", @range), "\e[0m" | |
} |
This file contains 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 characters
diff -r 1d5e7413d728 src/Make_ming.mak | |
--- a/src/Make_ming.mak Thu Sep 08 23:24:14 2011 +0200 | |
+++ b/src/Make_ming.mak Wed Sep 14 10:47:48 2011 +0900 | |
@@ -110,6 +110,14 @@ | |
PERLLIBS=$(PERLLIB)/Core | |
endif | |
+XSUBPP=$(PERLLIB)/ExtUtils/xsubpp | |
+XSUBPP_EXISTS=$(shell perl -e "print 1 unless -e '$(XSUBPP)'") | |
+ifeq "$(XSUBPP_EXISTS)" "" |
NewerOlder