hitode909

use experimental 'smartmatch';
use Test::More tests => 5;

sub in_tripartite_pact {
    my ($country) = @_;

    return $country ~~ ['Japan', 'Germany', 'Italy'];
}

ok in_tripartite_pact('Japan'), 'Japan signed the pact.';

hitode909

use strict;
use warnings;
use Encode qw(encode_utf8);
use Time::HiRes qw/usleep/;

my ($value) = @ARGV;

while(1) {
    print "$value\n";
    usleep 100000;

hitode909

FRB議長
JUNK2 陣内智則のひとり番長
KuRaRe編集長
NATO事務総長
NHK会長
QT延長
SS上級曹長
SS伍長
SS曹長
SS特務曹長

hitode909

#!/usr/bin/env ruby

puts "🐹  < #{ ARGV.empty? ? ARGF.read : ARGV.join(' ') }"

hitode909

package Mosikasite {
    sub new {
        my ($class) = @_;

        bless {}, $class;
    }

    sub AUTOLOAD {
        my ($self) = @_;
        my $method = (split '::', $AUTOLOAD)[-1];

hitode909

require 'shellwords'

class AnnotateLine
  attr_reader :content, :meta
  def initialize
    @meta = {}
    @content = nil
  end

  def add_line line

hitode909

#! /usr/bin/env ruby
# -*- coding: utf-8 -*-
# 接続中のWiFiのSSIDからインターネットにチェックインするやつ

ssid = `/System/Library/PrivateFrameworks/Apple80211.framework/Versions/Current/Resources/airport -I`.split(/\n/).find{|line| line =~ /\bSSID/ }.scan(/SSID: (.+)$/).flatten.first

system "open 'http://t.heinter.net/#{ ssid }'"

hitode909

#! /usr/bin/env ruby
puts `/System/Library/PrivateFrameworks/Apple80211.framework/Versions/Current/Resources/airport -I`.split(/\n/).find{|line| line =~ /\bSSID/ }.scan(/SSID: (.+)$/).flatten.first

hitode909

package main

import "fmt"

func Cbrt(x complex128) func() complex128 {
    z := complex128(1)
    return func() complex128 {
        z=z-(z*z*z-x)/(3*z*z)
        return z
    }

hitode909

package main

import "fmt"

func mynumber() map[string]func(int) int {
    sum := 0
    result := make(map[string]func(int)int)
    result["add"] = func(x int) int {
        sum += x
        return sum