libitte

Class::Accessorについて

これでClass::Accessorの内部実装がわかる。

perldoc -m Class::Accessor

documentはこっち

perldoc Class::Accessor

libitte

以下まるっと引用しておく。

Perlにおける真偽値を解説します。
Perlにおける偽値は次の五つです。

• 0
• "0"
• "" 空文字列
• undef

libitte

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

my $str = "0123456789abcdefghijklmnopqrstuvwxyz";

# 0番目の要素から10文字抜き出す
$left10 = substr($str, 0, 10);
printf "LEFT 10 character: %s\n", $left10;

libitte

to_unixtime

perl -e 'use Date::Parse;\$t=\"@ARGV\";printf(\"\$t\t%d\n\",str2time(\$t))'

from_unixtime

perl -e 'for(@ARGV){@t=localtime(\$_);printf(\"\$_\t%d/%02d/%02d %02d:%02d:%02d\n\",@t[5]+1900,@t[4]+1,@t[3],@t[2],@t[1],@t[0])}'

libitte

usage of apt-get

• notify with a new update

apt-watch

you can get above using 'apt-get install apt-watch'

• install

libitte

rsync options

Options Listed

 -v, --verbose               転送情報を詳しく表示
 -q, --quiet                 転送情報を表示しない
 -c, --checksum              常にチェックサムを行う
 -a, --archive               アーカイブモード(-rlptgoD オプションと同義)
 -r, --recursive             ディレクトリで再帰的に実行する
 -R, --relative              相対パス名を使う

libitte

kill screen session:

$ screen -ls
There are screens on:
  50135.pts-287.foo  (Detached)
	56049.pts-68.bar	(Detached)
	45032.pts-395.baz	(Detached)
4 Sockets in /var/run/screen/S-libitte.

$ screen -S 50135.pts-287.foo -X quit

libitte

sort files by size

ls -Sl

du

$ du -chs
3.9G .

libitte

[user]
    name = libitte
    email = [email protected]
[color]
    branch = auto
    diff = auto
    interactive = auto
    status = auto
    ui = true

libitte

tmux デタッチ アタッチ

atach

tmux a -t [session-number]

detach