sshなどでメールサーバーにログインしたときは、こんなんで読んでいます。 [mail box path]にあなたのメールボックスをフルパスで tail -20000 [mailbox path]|grep -n ^From -A 50|nkf -m

なにかをカウントする hoge [regexp] #!/usr/bin/perl$count=0;open(IN,"find . -name '*_*'|"); while(){ chomp $_; $tmp=`nkf $_|grep "$ARGV[0]" |wc`; my($li3,$li,$li2)=split(/\s+/,$tmp); $count+=$li; print $count,"\n"; } close();