henrik

# Generator for valid Swedish personnummer: http://en.wikipedia.org/wiki/Personal_identity_number_(Sweden)
# By Henrik Nyh <http://henrik.nyh.se> 2009-01-29 under the MIT license.

require 'date'

module Personnummer

  def self.generate(date=nil, serial=nil)
    date ||= Date.new(1900+rand(100), 1+rand(12), 1+rand(28))
    serial = serial ? serial.to_s : format("%03d", 1+rand(999))  # 001-999

netinlet

Getting up and running with OS X, Textmate & Scheme
===================================================

SCHEME
======

I ran across two implementations of Scheme which appear to work well with OS X.
mit-scheme & PLT Scheme.

I was able to install mit-scheme from darwin ports ( sudo port install mit-scheme)

jimeh

<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<dict>
  <key>KeepAlive</key>
  <true/>
  <key>Label</key>
  <string>com.rabbitmq.rabbitmq-server</string>
  <key>Program</key>
  <string>/usr/local/sbin/rabbitmq-server</string>

topfunky

###
  Modified from https://github.com/jashkenas/coffee-script/blob/master/Cakefile

  Part of an upcoming PeepCode screencast. This snippet is MIT Licensed.
###

{spawn, exec} = require 'child_process'

task 'assets:watch', 'Watch source files and build JS & CSS', (options) ->
  runCommand = (name, args) ->

pmarreck

# Get Sublime to use your rvm ruby... Change your ~/Library/Application Support/Sublime Text 2/Packages/Ruby/Ruby.sublime-build 
# (for ST3: ~/Library/Application Support/Sublime Text 3/Packages/User/Ruby.sublime-build) to this, replacing YOURUSERNAME.
# I am still looking to optimize this further... For example, avoiding hardcoding by using something like $HOME, although
# I have yet to get any form of that to work.

{
  "working_dir": "${project_path}",
  "cmd": [
    "/Users/YOURUSERNAME/.rvm/bin/rvm-auto-ruby", "-Ilib:test", "$file"
  ],

sciolist

require './oh_god_why'

class Object
  include FigureItOut
end

str = "hello, world."
puts str.make_upper_case # HELLO, WORLD.

this = "this be some text"

hyrmn

[AttributeUsage(System.AttributeTargets.All, AllowMultiple = true, Inherited = true)]
public class ಠ_ಠAttribute : Attribute
{
  public ILog Log { get; set; }

  public ಠ_ಠAttribute()
  {
    Log.Info("This code is bad and you should feel bad");
  }
}

AnthonyMastrean

def auto_add_dependencies(projects)
  projects.each do |project|
    each_project_dependency do |dependency|
      @dependencies.push dependency
    end
  end
end

def get_packages_config(project)
  return File.join File.dirname project, 'packages.config'

mausch

#r @"bin\debug\FsControl.Core.dll" // from https://github.com/gmpl/FsControl

open System
open FsControl.Core.Abstractions

// generic composition operators for all categories
let inline (>>) g f = Inline.instance (Category.Comp, f) g
let inline (<<) f g = Inline.instance (Category.Comp, f) g

// Lens definition

mat-mcloughlin

[AttributeUsage(System.AttributeTargets.All, AllowMultiple = true, Inherited = true)]
public class ಠ_ಠAttribute : Attribute
{
  public ILog Log { get; set; }
 
  public ಠ_ಠAttribute()
  {
    Log.Info("This code is bad and you should feel bad");
  }
}