|
>>4873 大臣 ご期待に沿えず残念ですが、たぶん多忙で善良なプロの皆さんとかからの 回答になると思います。 どのくらい完璧か晒したら進言あるかもですよ。 |
|
そういえば（どういえばだ）以前（数年前）Perl で goto FIN; sub foo {} FIN: だとエラーになるけど goto FIN; FIN: sub foo {} または goto FIN; sub foo {} FIN: ; だとダメ、という件があったんだけど、急に思い立って perlbug してみました。 ２時間後に返事が来て（すげえな）perlsyn に書いてあるけど それはバグではない、ラベルの後には１個以上の文がなければならないと いうことです。ＦＡＱらしいですね。 |
|
>>4872 68user 返信が遅くなりました。 68userさんの仰るように、自分でツールを作成する必要がある事を理解しました。 awkを使って作成しようと思います。 初めて作るので、時間がかかりそうですが結果はまた報告にきます。 ありがとうございました。 |
|
>>4883 しも さん、 どっちみち初心者だったら awk より Perl をおすすめします。 汎用性があるし可読性も高くできると思います。 ちょっと書いてみるとこんな感じでしょうか。 ★さしでがましければすみません。ここで読むのやめてください ^^ ★ ★ #! /bin/perl -w # dsize -- カレントディレクトリ以下のファイルサイズを集計 use File::Find; $total = 0; find(\&fileProc, '.'); print "Total\t$size\n"; sub fileProc { return unless -f $_; $size = -s $_; print "$File::Find::name\t$size\n"; $total += $size; } |
|
初歩的なことなんですが教えてください。 tar.gz な書庫にファイルを追加したい場合、 いちいちgunzipしないといけないんでしょうか？ なにかスマートな方法はあるんでしょうか？ |
|
はじめまして、つのりん と呼んでください。 早速ですがx68k専用マウスが故障しました。 症状はとしては、カーソルは全く異常なく動作しますが、クリックが左右ともできなくなりました。原因はボタン下のマイクロスイッチの故障ではないかと思われます。 なにか対策法はありませんか？ よろしくお願いします。 |
|
はじめまして。 http://x68000.q-e-d.net/~68user/unix/pickup?find findの説明のところで、 -atime 4 4日前にアクセスされたファイル -ctime 4 ちょうど4日前にファイルステータスが変更されたファイル -mtime 4 ちょうど3日前に修正されたファイル と、mtimeだけ3日前となっていますが、これは間違いでしょうか？ |
|
findで、検索する文字が複数出てくる場合の 記述について教えてください。 あるディレクトリに、以下の様な「YYYYmmdd」形式の ディレクトリが存在した場合ですが、名前がすべて、 「0〜9」の数字であるディレクトリのみを表示したい のですが、どのように書けばよいのでしょうか。 find . -name '[0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]' -type d で表示されるのですが、 [0-9]を8回書く以外に、違った書き方はないでしょうか。 find . -name '[0-9]*[0-9]' -type d find . -name '[0-9]......[0-9]' -type d find . -name '[0-9]*......[0-9]' -type d find . -name '[0-9]......*[0-9]' -type d とかしてみたのですが。 /tmp配下に、 20080301 20080302 20080303 20080303.bk a0080304 2008030a 200a0306 200080307 |
|
>>4885 maya > tar.gz な書庫にファイルを追加したい場合、いちいちgunzipしないといけないんでしょうか？ r で追加できますが、gzip してある場合はできないようですので、gunzip が必要と 思われます (BSD tar と GNU tar で確認)。 >>4886 つのりん ヤフオクによく出品されているように見えますので、チェックしてみてはどうでしょうか 今は「キーボード & マウス [未使用]」が出てますね。 >>4887 mm > と、mtimeだけ3日前となっていますが、これは間違いでしょうか？ ありがとうございます。誤りでしたので修正いたしました。 >>4888 べた Perl の正規表現 (PCRE) であれば [0-9]{8} もしくは \d{8} ですが、POSIX における 基本正規表現や拡張正規表現では上記のような表現はできませんので、find にこだわる のであれば 8回書くしかないです。 あるいは、 ・File::Find を使った perl のワンライナーでがんばる ・シェル変数を使う csh・tcsh の場合: % set x='[0-9]' % find . -name "$x$x$x$x$x$x$x$x" sh・bash の場合: % x='[0-9]' % find . -name "$x$x$x$x$x$x$x$x" など。 |
|
>>4889 68user ありがとうございます。 |