テスト

シンタックスの色づけテスト

;;scheme
(define (factorial n)
  (if (eq? n 1)
      1
      (* n (factorial (- n 1)))))
(factorial 5)

おお

#!/usr/bin/perl
#Time-stamp: <06/12/15 16:25:58 duck>

use strict;  
use warnings;

package Duck;

sub new {
    bless {} , shift;
}

sub bark {
    print "gaa!gaa!\n";
}

package main;

Duck->new->bark;

背景が黒地だと配色がちょっときもくなるな。CSS変えよう