none /proc/bus/usb usbdevfs gid=5,mode=620 0 0

PATH=/bin:/usr/bin           #パスの設定 (必要なら)
MAILDIR=$HOME/Mutt/          #ここ以下のディレクトリにメールを配送する
DEFAULT=$HOME/Maildir/       #条件にあてはまらないメールのはいるディレクトリ
LOGFILE=$HOME/.procmail.log  #ログファイル (必要なら)

:0                           #スタート行
* ^Subject: test             #条件。egrepに渡すもの。正規表現可。
testbox/                     #配送先。$MAILDIR/testbox/にはいる

:0
* ^Subject:.*@ga|@gb|@gc     #こういう書きかたも可
| $HOME/bin/badmailfrom      # | で始めるとshellに渡る。! で始めるとメールアドレス

:0
* ^From:.*@hotmail\.com|@yahoo\.com
/dev/null                    #ステ

#!/usr/bin/perl
$TEMPDIR="/tmp";
open F, ">$TEMPDIR/badmailfrom.$$";
while(<>){
	if (/^From: (.*@.*)/){
		$mailfrom = $1;
	}
	push @badmail, $_;
}
print F "Hi. This is the qmail-send program at LocalDomain\n";
print F "I'm afraid I wasn't able to deliver your message to the following addresses.\n";
print F "This is a permanent error; I've given up. Sorry it didn't work out.\n\n";
print F ":\n";
print F "Sorry, no mailbox here by that name. (#5.1.1)\n\n";
print F "--- Below this line is a copy of the message.\n\n";
print F @badmail;

$ENV{'QMAILINJECT'} = "f";
$ENV{'QMAILHOST'} = "LocalDomain";
$ENV{'QMAILUSER'} = "MAILER-DAEMON";
close F;
`cat $TEMPDIR/badmailfrom.$$ | mail $mailfrom -s 'failure notice'`;
unlink "$TEMPDIR/badmailfrom.$$";

if exists("b:is_kornshell") || exists("b:is_bash")
  syn sync match shUntilSync    grouphere       shRepeat        "\"
  syn sync match shWhileSync    grouphere       shRepeat        "\"
endif

escp|esc/page printer filter:\
        :lp=/dev/lp0:sh:\
        :if=/usr/local/sbin/escpagesf:\
        :of=/usr/local/sbin/escpagesf:\
        :sd=/var/spool/lpd/escp:\
        :pw#80:pl#66:\
        :af=/var/log/lp-acct:\
        :lf=/var/log/lp-errs:

\makeatletter
  \renewcommand{\section}{
    \@startsection{section}{1}{\z@}
    {0.6\Cvs}{0.4\Cvs}
    {\normalfont\@secapp}}
\makeatother

fn - -- {
  comm = `{$0^p $*}
  if (! ~ $#comm 0) {
    echo $comm >[1=2]
    eval $comm
  }
}

#!/usr/bin/perl
use Gtk;
set_locale Gtk;
init Gtk;
$window = new Gtk::Window("toplevel");
$window->signal_connect("delete_event", \&CloseAppWindow);
$window->show();
$button = new Gtk::Button("こんにちは世界！");
$button->signal_connect("clicked", \&CloseAppWindow);
$window->add($button);
$button->show();
main Gtk;
exit(0);
sub CloseAppWindow{
        Gtk->exit(0);
        return 0;
}

帰納的に、全てのプログラミング言語の力の違いを見分けることが出来るのは、
最もパワフルな言語を理解するプログラマのみであるということになる (これが、
エリックがLispは良いプログラマを作ると言った真意だろうと思う)。この「ほげ」
のパラドックスのために、他の人の意見は参考にならない。誰であれ、プログラム
について考える時には自分が使うことになった言語に思考が支配されているから、
その言語に満足してしまうんだ。

• http://hx.x0.com/~cb/s-osamu/pc/cf-c33kai.html
• http://www.asahi-net.or.jp/~nt4k-wtnb/pc-kai.htm

1. /etc/hostsを読まない
2. loginに非常に時間がかかる (60secぐらい)

# /etc/nsswitch.conf
#
# Name Service Switch configuration file.
#

passwd:     files
shadow:     db files
group:      files
hosts:      files dns
services:   files
networks:   files
protocols:  files
rpc:        files
ethers:     files
netmasks:   files
bootparams: files
automount:  files
aliases:    files
netgroup:   files
publickey:  files

keymap  X    DISPLAY_IMAGE
keymap  C-c  STOP_IMAGE
keymap  t    SET_OPTION  display_image=toggle

vm/bdflush = 40 0 0 0 3600 3000 60 0 0