mamemomonga

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

my $curl='curl';

sub php_latest {
	my $release=shift;
	my $atom=`$curl http://www.php.net/releases/feed.php`;
	while( $atom=~m#<link rel="enclosure" title="([^"]+)" href="([^"]+)">#mg ) {

mamemomonga

hardstatus alwayslastline "%H [%02c] %`%-w%{=b bw}%n %t%{-}%+w"
vbell off
bind s
bind ^U encoding utf8
bind ^E encoding euc
startup_message off
autodetach on
defscrollback 8192

mamemomonga

syntax on
set wildmenu
set history=100

set number
"set list
set scrolloff=5

"set nobackup
"set backupdir=/tmp

mamemomonga

#!/bin/ash
# ESXi Tech Support Mode(SSH)で仮想マシンをクローンする。
# コピー先のディスクイメージはThin Provisioning
# 一つのディレクトリにまとまっている必要がある。

# 仮想マシンは /vmfs/volumes/以下に [DATASTORE]/[VM] という形で存在しているので
# データストア: DS1にあるVM1をDS2のVM2としてクローンする場合は
#   clone_virtual_machine.sh "DS1/VM1" "DS2/VM2"
# と実行する。クローン後は上記の例のVM2の名前でIntentoryに登録される。

mamemomonga

#!/usr/bin/env perl
use strict;
use warnings;
use utf8;
use 5.10.0;
binmode(STDOUT,':utf8');

# --------------------------------------------------------------
# iTunesで選択範囲のアルバムアーティストが空の場合
# アーティストをアルバムアーティストとして設定する

mamemomonga

find / -maxdepth 1 -type d -exec du -sh {} \;

mamemomonga

#!/bin/sh
exec ssh -o 'ProxyCommand=ssh PFUSER@PFHOST -W %h:%p 2> /dev/null' "$@"

mamemomonga

#!/usr/bin/env perl
use utf8;
use strict;
use warnings;
use URI::Escape;
binmode(STDOUT,':utf8');

my %cnf=(
	name        => 'prowl_notify_wifi_addr',
	curl        => '/usr/bin/curl',

mamemomonga

MinGW+MinTTY 環境構築メモ

Cygwinと共存させるため、パスはシステムに設定しないでMinGWでMinTTYを使えるようにする。 （環境変数にHOMEが変更されてしまった場合、Cygwinの動作がおかしくなるので注意。）

ターミナルとしてのMinGW+MinTTYのセットアップ

Windows7にmingw-getでMSYSのsshとrsyncをインストールする

mingw-get-setup.exeのダウンロードと実行

mamemomonga

ディレクトリ単位でパッチを作成、パッチを当てる

diff -cr [元フォルダ] [修正後フォルダ] > [パッチファイル]
patch -p0 < [パッチファイル]