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
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
use Text::Xslate; | |
use Devel::KYTProf; | |
use Data::Section::Simple; | |
Devel::KYTProf->add_prof( | |
"Text::Xslate", | |
"render", |
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
use strict; | |
use warnings; | |
use utf8; | |
use Encode; | |
use WebService::Simple::ATND; | |
my @keywords = qw/東京 perl/; | |
my @ym = qw/201302 201303 201304/; | |
my $query = WebService::Simple::ATND->query_events(count => 30); |
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
#!/usr/bin/env perl | |
# package ClassBless; | |
# # 原始的なPerlの書き方 | |
# use strict; | |
# use warnings; | |
# use utf8; | |
# use Data::Dump qw/dump/; | |
# sub new { | |
# my $class = shift; | |
# my %args = @_; |
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
package Amon2::Plugin::Model; | |
use strict; | |
use warnings; | |
use Module::Find; | |
use Try::Tiny; | |
our $VERSION = '0.01'; | |
sub init { | |
my ($class, $context_class, $config) = @_; |
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 | |
TERMINAL_ID="RubyMotionBuilder" | |
PROJECT_DIR="$1" | |
OPTIONS="$2" | |
if [ "${PROJECT_DIR}" = "" ]; then | |
exit 1 | |
fi |
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
# Created by https://www.gitignore.io/api/vim,ruby | |
### Vim ### | |
[._]*.s[a-w][a-z] | |
[._]s[a-w][a-z] | |
*.un~ | |
Session.vim | |
.netrwhist | |
*~ |
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
#!/usr/bin/env perl | |
=head1 Examples | |
$ tail -f access_log | perl colorize.pl | |
$ plackup app.psgi 2>&1 | perl colorize.pl | |
=cut | |
use strict; |
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
bundle install |
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
data = [ [8,2,22,97,38,15,0,40,0,75,4,5,7,78,52,12,50,77,91,8], | |
[49,49,99,40,17,81,18,57,60,87,17,40,98,43,69,48,4,56,62,0], | |
[81,49,31,73,55,79,14,29,93,71,40,67,53,88,30,3,49,13,36,65], | |
[52,70,95,23,4,60,11,42,69,24,68,56,1,32,56,71,37,2,36,91], | |
[22,31,16,71,51,67,63,89,41,92,36,54,22,40,40,28,66,33,13,80], | |
[24,47,32,60,99,3,45,2,44,75,33,53,78,36,84,20,35,17,12,50], | |
[32,98,81,28,64,23,67,10,26,38,40,67,59,54,70,66,18,38,64,70], | |
[67,26,20,68,2,62,12,20,95,63,94,39,63,8,40,91,66,49,94,21], | |
[24,55,58,5,66,73,99,26,97,17,78,78,96,83,14,88,34,89,63,72], | |
[21,36,23,9,75,0,76,44,20,45,35,14,0,61,33,97,34,31,33,95], |
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
#!/usr/bin/env ruby | |
# encoding : utf-8 | |
require 'set' | |
t = Time.now | |
# 素数の判定 | |
def prime?(num, ary) | |
ary.each do |n| | |
break if n * n > num | |
return false if num % n == 0 |