Skip to content

Instantly share code, notes, and snippets.

use Test::More qw(no_plan);
## sub foo {
## my @results;
## #...snip...
## return \@results || [] ;
## }
my @array;
--- troys_twitter_script.user.js.orig 2009-05-01 21:15:31.000000000 -0700
+++ troys_twitter_script.user.js 2009-05-01 21:13:55.000000000 -0700
@@ -1306,6 +1306,12 @@
}
});
}
+ else if( url.match(/vimeo\.com\/(\d+)/) && tnt_twitter.can('video_embed') )
+ {
+ var clip_id = url.match(/vimeo\.com\/(\d+)/)[1];
+ var embed_html = '<object width="400" height="225"><param name="allowfullscreen" value="true" /><param name="allowscriptaccess" value="always" /><param name="movie" value="http://vimeo.com/moogaloop.swf?clip_id='+clip_id+'&amp;server=vimeo..com&amp;show_title=1&show_byline=1&amp;show_portrait=0&amp;color=00ADEF&amp;fullscreen=1" /><embed src="http://vimeo.com/moogaloop.swf?clip_id='+clip_id+'&amp;server=vimeo.com&amp;show_title=1&amp;show_byline=1&amp;show_portrait=0&amp;color=00ADEF&amp;fullscreen=1" type="application/x-shockwave-flash" allowfullscreen="true" allowscriptaccess="allywas" width="400" height="255"></embed></object>'
use Lyst;
use ShortenURL;
method hello :Path('/') {
my $body =
<<' EOF';
<form method="POST">
<input name="longurl">
<input type="submit">
</form>
t/98_pod-coverage.t .... 1/16 Can't locate POE/Component/Client/HTTPDeferred.pm in @INC (@INC contains: /Users/sekimura/github/mash-Hoppy/inc /Users/sekimura/github/mash-Hoppy/blib/lib /Users/sekimura/github/mash-Hoppy/blib/arch /Users/sekimura/perl5/lib/perl5/darwin-thread-multi-2level /Users/sekimura/perl5/lib/perl5/darwin-thread-multi-2level /Users/sekimura/perl5/lib/perl5 /Users/sekimura/perl5/lib/perl5/darwin-thread-multi-2level /Users/sekimura/perl5/lib/perl5 /Users/sekimura/perl5/lib/perl5/darwin-thread-multi-2level /System/Library/Perl/5.8.8/darwin-thread-multi-2level /System/Library/Perl/5.8.8 /Library/Perl/5.8.8/darwin-thread-multi-2level /Library/Perl/5.8.8 /Library/Perl /Network/Library/Perl/5.8.8/darwin-thread-multi-2level /Network/Library/Perl/5.8.8 /Network/Library/Perl /System/Library/Perl/Extras/5.8.8/darwin-thread-multi-2level /System/Library/Perl/Extras/5.8.8 /Library/Perl/5.8.6 /Library/Perl/5.8.1 .) at (eval 92) line 1.
BEGIN failed--compilation aborted at (eval 92) line 1.
env T4R_ENV=development bin/t4rsh
>> @twitter.my(:followers).map{|u| u.screen_name if u.url && u.url.match('http://tinyurl.com')} - [nil].each {|sn| puts sn if sn}
=> ["nadiamodel", "gemlove", "rachelgome", "jackielovex"]
>> @twitter.my(:followers).map{|u| u.screen_name if u.url && u.url.match('http://tinyurl.com')} - [nil].each {|sn| @twitter.block(:add, sn) if sn}
=> ["nadiamodel", "gemlove", "rachelgome", "jackielovex"]
ANA Customer Service Center
1-800-2FLY ANA (1-800-235-9262)
press 2 to speak in Japanese
press 4 to go to AMC member menu
press 5 to talk with operater
press [your AMC member number and #]
wait and pray
diff -r b254f2982f23 aaws.py
--- a/aaws.py Tue May 19 16:26:03 2009 +0900
+++ b/aaws.py Tue May 19 18:29:57 2009 -0700
@@ -949,7 +949,10 @@
if node.tagName in plugins['isCollected']:
setattr(bag, key, unmarshall(node, plugins, Bags([])))
elif node.tagName in plugins['isCollective']:
- bag.append(unmarshall(node, plugins))
+ if type(bag) <> type([]):
+ setattr(bag, key, [unmarshall(node, plugins)])
@sekimura
sekimura / gist:128300
Created June 11, 2009 23:15
snipshot.com
javascript:(function(){f='http://services.snipshot.com/?snipshot_input='+encodeURIComponent(window.location.href)+'&snipshot_callback='+encodeURIComponent("http://www.imagehousing.com/upload.php")+'&snipshot_output=fileupload';a=function(){if(!window.open(f))location.href=f};if(/Firefox/.test(navigator.userAgent)){setTimeout(a,0)}else{a()}})()
diff --git a/googlereader.vim b/googlereader.vim
index 71f10bf..4b0fe80 100644
--- a/googlereader.vim
+++ b/googlereader.vim
@@ -335,7 +335,7 @@ function! s:ShowEntry()
execute winnr.'wincmd w'
endif
endif
- setlocal buftype=nofile bufhidden=hide noswapfile nowrap ft= nowrap nonumber mo
+ setlocal buftype=nofile bufhidden=hide noswapfile wrap ft= nonumber modifiable
@sekimura
sekimura / gist:131625
Created June 18, 2009 00:32
add items to iTunes Library Folder Action script
on adding folder items to this_folder after receiving added_items
try
tell application "iTunes"
activate
add the added_items
end tell
end try
end adding folder items to