whymarrh

perl -e 'exit -1'
perl -e "print unpack('c', pack('C', $?)), \$/"

whymarrh

{
	"name": "Minimal New Tab",
	"version": "0.0.0",
	"manifest_version": 2,
	"description": "A minimalist New Tab page.",
	"chrome_url_overrides" : {
		"newtab": "newtab.html"
	}
}

whymarrh

<!--

Directory structure:

	.
	├── build.xml
	├── libs
	└── src
	    └── foo
	        └── bar

whymarrh

#!/usr/bin/env bash
last | grep $(whoami) | tr -s ' ' | cut -d ' ' -f3 -f4 -f5 | uniq

whymarrh

-- PRAGMAs
PRAGMA foreign_keys = ON;

-- User
CREATE TABLE account(
	id                     TEXT    PRIMARY KEY,
	user_id                TEXT    UNIQUE      NOT NULL,
	password               TEXT                NOT NULL,
	password_reset_code    TEXT                NULL,
	email                  TEXT    UNIQUE      NOT NULL,

whymarrh

DOMTokenList.prototype.add.apply(
	window.document.documentElement.classList,
	window.location.host.substring(0, window.location.host.lastIndexOf('.')).split('.')
);

whymarrh

#!/usr/bin/env bash

# servers
jeeves="localhost:7211"
alfred="localhost:7212"

abyss="/dev/null"

cd "public"
php -S "$jeeves" &> "$abyss" &

whymarrh

<?php

use PHPUnit_Framework_Exception;
use PHPUnit_Framework_TestCase;
use SimpleXMLElement;

class BaseTestCase extends PHPUnit_Framework_TestCase
{
	/**
	 * Show as much error information as possible

whymarrh

#!/usr/bin/env php
<?php

	define(SUCCESS, 0);
	define(ERROR,   1);

	if (count($argv) != 2) {
		printf("usage: %s <filename>\n", basename($argv[0]));
		exit(ERROR);
	}

whymarrh

#include <stdio.h>

#define as while

// as seen on Stack Overflow
// http://stackoverflow.com/q/1642028

int main(int argc, char **argv) {
	int x = 42;
	as (x --> 0) {