gslin

#!/usr/bin/env perl

use 5.010;
use strict;
use warnings;

use Carp;
use IO::File;
use JSON;
use WWW::Mechanize;

zzak

ObjectSpace::AllocationTracer.trace do
 5.times do
   foo = "foo".freeze
 end
end
#=> {}

TikhonJelvis

{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE QuasiQuotes     #-}

import qualified Data.Graph.Inductive      as Graph
import           Data.Graph.Inductive      (Gr, match, matchAny)
import           Data.String.Interpolation (str)

complex :: Gr () ()
complex = Graph.mkGraph nodes edges
  where nodes = [(x, ()) | x <- [1..10]]

yorkxin

KKBOX Playlist (KBL 檔) 製作方式

Moved to https://github.com/chitsaou/kbl-generator

namuol

rage-quit support for bash

HOW TO INSTALL

Put flip somewhere in your $PATH and chmod a+x it.

Copy fuck into ~/.bashrc.

orend

def age(with_respect_to = Time.now)
  ...
end

caasi

 作者  Thor (淡出)                                          看板  plan
 標題  Maple未來發展
 時間  Fri Jul 24 09:47:41 1998
───────────────────────────────────────

只是隨便取個聳動的標題而已:ppp

現在 bbtpd.c opus還沒寫完就消失了,
我在想直接接下去寫會不會對他大不敬呀?:P

joeperrin-gists

function copyToClipboard( text ){
                var copyDiv = document.createElement('div');
                copyDiv.contentEditable = true;
                document.body.appendChild(copyDiv);
                copyDiv.innerHTML = text;
                copyDiv.unselectable = "off";
                copyDiv.focus();
                document.execCommand('SelectAll');
                document.execCommand("Copy", false, null);
                document.body.removeChild(copyDiv);

lelandbatey

Description

This simple script will take a picture of a whiteboard and use parts of the ImageMagick library with sane defaults to clean it up tremendously.

The script is here:

#!/bin/bash
convert "$1" -morphology Convolve DoG:15,100,0 -negate -normalize -blur 0x1 -channel RBG -level 60%,91%,0.1 "$2"

Results

gruber

#!/usr/bin/env perl
#
# http://daringfireball.net/2007/03/javascript_bookmarklet_builder

use strict;
use warnings;
use URI::Escape qw(uri_escape_utf8);
use open  IO  => ":utf8",		# UTF8 by default
		  ":std";				# Apply to STDIN/STDOUT/STDERR