pasberth

class Object
  def in enum
    enum.include? self
  end
end

if 'a'.in ['a', 'b', 'c']
  puts 'hello'
end
# => hello

pasberth

class Class

  def definit *params, &initialize
    define_method :initialize do |*args, &blk|
      until params.empty?
        instance_variable_set :"@#{params.shift.to_sym}", args.shift
      end
      initialize && instance_exec(*args, &initialize)
    end
  end

pasberth

class Object

  def in? enum
    enum.include? self
  end

end

module Enumerable

pasberth

$options = { you: nil }.merge $options || {}

if $options[:you]
  puts "hello #{$options[:you]}"
else
  puts "hello guest"
end

pasberth

class Module

  def original method

    original_methods = Hash.new do |original_methods, method|
      original_methods[method.to_sym] = original_method = []
      define_method :"original_#{method.to_sym}" do |*args, &blk|
        fail if original_method.empty?
        tmp = original_method.pop
        res = tmp.call *args, &blk

pasberth

class Array

  def === other
    zip(other.to_ary).all? { |mine, theirs| mine === theirs }
  end

end

puts case [:lover, 'mana', 18]
     when [Symbol, String, Integer] then 'love!'

pasberth

class Hello
  def hello_world *args
    puts "hello", *args
  end
end

pasberth

# -*- coding: utf-8 -*-

class Module

  private

  def decorators
    @decorators ||= []

  def decorator *args, &blk

pasberth

module Enumerable
  def each_of key, &blk
    return Enumerator.new self, :each_of, key unless block_given?
    each do |e|
      blk.call e[key]
    end
  end
end

res = [[1, 2], [3, 4]].each_of(0).map do |i|

pasberth

# -*- coding: utf-8 -*-
class Module

  def define(consname, value=nil, &blk)
    if value
      const_set(consname, value)
    else
      define_method(consname, &blk)
    end
  end