mackee

import time

def stopwatch(self, wrapped):
  def _wrapper(*args, **kwargs):
    tic = time.time()
    result = wrapped(*args, **kwargs)
    toc = time.time()
    doc = str(wrapped.__doc__).split("\n")[0]
    print("[%s] %f[sec]" % (doc, toc - tic))
    return result

mackee

#!/usr/bin/env perl
use strict;
use warnings;
use utf8;
use feature qw/say/;

use Imager;
use Imager::AnimeFace;
use Getopt::Long;

mackee

#!/usr/bin/env python
# -*- coding: utf-8 -*-

import sys
import os
import time
import subprocess
from threading import Thread
import signal

mackee

use strict;
use warnings;
use utf8;

use 5.014;

{
    package MyApp::Dispatcher;
    sub name { return 'Hogehoge' }
}

mackee

use strict;
use warnings;
use utf8;

use 5.014;

{
    package MyApp::Dispatcher;
    sub name { return 'Hogehoge' }
}

mackee

use strict;
use warnings;
use utf8;

use 5.014;

{
    package MyApp::Dispatcher;
    sub name { return 'Hogehoge' }
}

mackee

--- .maltsconfig	2012-10-22 04:46:19.000000000 +0900
+++ .maltsconfig.new	2012-10-22 05:14:17.000000000 +0900
@@ -13,5 +13,10 @@
             module_camelized_path => qr/root/,
             module_camelized_name => qr/root/,
         },
+        database => {
+            files => [
+                'lib/Natchan/DB.pm'

mackee

#!/usr/bin/env perl
use strict;
use warnings;
use utf8;

use DDP;

my @keys = qw/zero one two three four five six seven eight nine ten/;
my %numeral_to_number = ();
for my $value (0..10) {

mackee

#!/usr/bin/env perl
use strict;
use warnings;
use utf8;

use DDP;
use 5.012;
use Test::More;

my @numerals = qw/zero one two three four five six seven eight nine ten/;

mackee

#!/usr/bin/env perl
use strict;
use warnings;
use utf8;

use DDP;
use 5.012;
use Benchmark qw/:all/;

my @numerals = qw/zero one two three four five six seven eight nine ten/;