Tokuhiro Matsuno tokuhirom

## gist:255029
#!/usr/bin/perl
use strict;
use PadWalker 'peek_my';

my $x = 1;
sub {
    sub { $x };
    (sub { peek_my(0) })->();
}->();

## gist:218473
東京は雨がすごいですが!

## Makefile
hello.txt: hello.as
	as -o hello.o hello.as
	ld -o hello.txt hello.o

## .bashrc
# $ tweet Hi mom!
#
# Put this in ~/.bashrc or wherever.
# If it doesn't work, make sure your ~/.netrc is right
#
# (Thanks to @anildigital and @grundprinzip for curl-fu)

function tweet {
  curl -n -d status="$*" https://twitter.com/statuses/update.xml --insecure &> /dev/null
  echo "tweet'd"

## gist:142523

      
        
          
            
              
              0 files
            
          
          
            
              
              0 forks
            
          
          
            
              
              0 comments
            
          
          
            
              
              0 stars
            
          
        
        
          
              
          
          
            
                tokuhirom
                / gist:142523
            
            
              Created
              July 8, 2009 02:41
                — forked from miyagawa/gist:142501
            
          
        
      
        
          
            
              
              We couldn’t find that file to show.
	#!/usr/bin/perl
	use strict;
	use PadWalker 'peek_my';

	my $x = 1;
	sub {
	sub { $x };
	(sub { peek_my(0) })->();
	}->();
	hello.txt: hello.as
	as -o hello.o hello.as
	ld -o hello.txt hello.o
	# $ tweet Hi mom!
	#
	# Put this in ~/.bashrc or wherever.
	# If it doesn't work, make sure your ~/.netrc is right
	#
	# (Thanks to @anildigital and @grundprinzip for curl-fu)

	function tweet {
	curl -n -d status="$*" https://twitter.com/statuses/update.xml --insecure &> /dev/null
	echo "tweet'd"