下へ
＞ 2001/05/12 (土) 03:29:00 ◆ ▼ ◇ [mirai]> > 前にURAでたｽﾀｰｵｰｼｬﾝのSSで抜いたよ。
> > 頭悪かったけどﾎﾞﾘｭｰﾑたっぷりなのが大変よい(´ー｀)
> ｳﾗｳﾗｳﾗｳﾗｳﾗ!!!!!!(;ﾟДﾟ)
ヽ(´ー`)ﾉ⌒http://www.ex.sakura.ne.jp/~hatakazu/mumu/mu04.html
参考：2001/05/12(土)03時28分13秒
2001/05/12 (土) 03:28:49 ◆ ▼ ◇ [mirai]地蔵は今日もかわいいな(*´Д`)
＞地蔵 2001/05/12 (土) 03:28:42 ◆ ▼ ◇ [mirai]> > 聞いたことあるような…(;´Д`)でも思い出せない
> > 詳細をば(;´Д`)たのんます
> machineヽ(´ー｀)ノHERO
ｷﾖｼヽ(´ー｀)ノｶｺｲｲ
参考：2001/05/12(土)03時27分49秒
＞ 2001/05/12 (土) 03:28:34 ◆ ▼ ◇ [mirai]> > 何かをしなくちゃいけないような気がするんだが何をしなくちゃいけないのか
> > 忘れてしまった(;´Д`)なんだっけ？
> 就職
もう内定貰ったし働くのは来年からだよ(;´Д`)思い出せない
参考：2001/05/12(土)03時25分03秒
＞ 2001/05/12 (土) 03:28:13 ◆ ▼ ◇ [mirai]> 前にURAでたｽﾀｰｵｰｼｬﾝのSSで抜いたよ。
> 頭悪かったけどﾎﾞﾘｭｰﾑたっぷりなのが大変よい(´ー｀)
ｳﾗｳﾗｳﾗｳﾗｳﾗ!!!!!!(;ﾟДﾟ)
参考：2001/05/12(土)03時27分56秒
2001/05/12 (土) 03:27:56 ◆ ▼ ◇ [mirai]前にURAでたｽﾀｰｵｰｼｬﾝのSSで抜いたよ。
頭悪かったけどﾎﾞﾘｭｰﾑたっぷりなのが大変よい(´ー｀)
2001/05/12 (土) 03:27:50 ◆ ▼ ◇ [mirai]天使の翼よ！わたしとヒカルを誘って！(^Д^)
＞ 投稿者：地蔵 2001/05/12 (土) 03:27:49 ◆ ▼ ◇ [mirai]> > (´Д`)＜♪やがて漏れは鳥になり 必殺技を繰り出す～
> 聞いたことあるような…(;´Д`)でも思い出せない
> 詳細をば(;´Д`)たのんます
machineヽ(´ー｀)ノHERO
参考：2001/05/12(土)03時26分01秒
＞ 2001/05/12 (土) 03:27:47 ◆ ▼ ◇ [mirai]> ﾓ前らはほんとにくりおが好きだな
ココチも好きです
参考：2001/05/12(土)03時27分08秒
2001/05/12 (土) 03:27:08 ◆ ▼ ◇ [mirai]ﾓ前らはほんとにくりおが好きだな
投稿者：地蔵 2001/05/12 (土) 03:27:06 ◆ ▼ ◇ [mirai]１．ここ 曙の湧きでる丘 ●× 目をあげて
きみとぼく きみとぼく 光と光 涙のなかからも
きらめかねばならない 若い稲妻 ゆんゆん
ああ 何のために人間はいるのか
発信しよう 激しい愛を
青さのむこう 昼の空の星にまで
発信 ゆんゆん 発信 ゆんゆん 発信 ゆんゆん 光と光
２．ここ そよ風の生まれでる丘 ●× 顔あげて
あなたとわたし あなたとわたし 緑と緑 悶えのなかからも
炎えあがらねばならない 若い竜巻 よんよん
ああ 何のために世界はあるのか
受信しよう 熱い祈りを
苦しみのむこう 夜の底の太陽からも
受信 よんよん 受信 よんよん 受信 よんよん 緑と緑
３．いま 青春の噴きでる丘 ●× 声あげて
みんなとみんな みんなとみんな 未来と未来 絶望のなかからも
歌いださねばならない 若い積乱雲 やんやん
ああ 何のために地球はあるのか
交信しよう 美しい夢を
悲しみのむこう 宇宙の奥の宇宙まで
交信 やんやん 交信 やんやん 交信 やんやん 未来と未来
●× ●×
2001/05/12 (土) 03:26:24 ◆ ▼ ◇ [mirai]もどってきとよ～ヽ(´ー｀)ノつかれた～
＞ 2001/05/12 (土) 03:26:21 ◆ ▼ ◇ [mirai]> > 俺が作るとこうなります。
> > エラー処理なんて糞食らえですよ
> > opendir DH, '.';
> > for (readdir DH) {
> > ($folder) = $_ =~ /([^_]+)_.*/;
> > mkdir $folder;
> > rename $_, $folder."/".$_;
> > }
> .と..は除外する注意力を(;´Д`)
そのくらい気にせずヽ(´ー｀)ノ手動で戻せ
参考：2001/05/12(土)03時19分35秒
＞地蔵 2001/05/12 (土) 03:26:01 ◆ ▼ ◇ [mirai]> (´Д`)＜♪やがて漏れは鳥になり 必殺技を繰り出す～
聞いたことあるような…(;´Д`)でも思い出せない
詳細をば(;´Д`)たのんます
参考：2001/05/12(土)03時20分31秒
2001/05/12 (土) 03:25:44 ◆ ▼ ◇ [mirai]やぁ！ﾎﾞｸが来たりゅん♪
＞ 2001/05/12 (土) 03:25:03 ◆ ▼ ◇ [mirai]> 何かをしなくちゃいけないような気がするんだが何をしなくちゃいけないのか
> 忘れてしまった(;´Д`)なんだっけ？
就職
参考：2001/05/12(土)02時27分48秒
＞ 2001/05/12 (土) 03:24:45 ◆ ▼ ◇ [mirai]> > ゆんゆんって何よ？
> 新参は半年ROMな(;´Д`)
あー(;´Д`)いつ頃のﾈﾀよ？
ﾏﾐｰはﾘｱﾙﾀｲﾑで見てたがゆんゆんはしらねけ
参考：2001/05/12(土)03時22分15秒
＞ 2001/05/12 (土) 03:24:34 ◆ ▼ ◇ [mirai]> > ｺｲｼゆんゆんとマミー両方に見事に引っかかったのか
> > アホだね
> > http://utenti.tripod.it/nyunyu/
> ゆんゆんって何よ？
ここのvol.42見れ
http://at-fashion.com/strangetimes/41-50.html
参考：2001/05/12(土)03時21分53秒
＞ 2001/05/12 (土) 03:24:24 ◆ ▼ ◇ [mirai]> > 地方大会から注目してたよって言われてても(;´Д`)
> カメラをでかくてもしてないだろ！って感じだよな(;´Д`)
ごめん、国語２の漏れにゆっくりもう一度言ってくれないか？(;´Д`)
参考：2001/05/12(土)03時22分35秒
＞ 2001/05/12 (土) 03:24:11 ◆ ▼ ◇ [mirai]> > 地方大会から注目してたよって言われてても(;´Д`)
> カメラをでかくてもしてないだろ！って感じだよな(;´Д`)
君の日本語が信じられない
参考：2001/05/12(土)03時22分35秒
＞ 2001/05/12 (土) 03:22:37 ◆ ▼ ◇ [mirai]> 自宅サーバーにゲームボーイ用ソフトなどを
> アップロードした男性を逮捕
> 5月11日 発表
> 徳島県警生活保安課と徳島東署、ハイテク犯罪対策室は、
> 佐賀市内でゲームソフトを自宅サーバー内にアップロードし、
> 他ユーザーにダウンロードさせていた男性を著作権法違反
> (公衆送信権侵害) の疑いで逮捕した。
> 著作権問題などの啓蒙を行なっている社団法人
> コンピュータソフトウェア著作権協会 (ACCS) によれば、
> 男性は海外の無料サーバーや自宅に設置したインターネット
> 常時接続のサーバーに、「ドラゴンクエストモンスターズ」や
> 「ポケットモンスター金」、「三國志IV」といった
> スーパーファミコンやゲームボーイなどコンシューマゲーム機用の
> ゲームソフトをアップロードし、国内プロバイダ内に開設した
> ホームページから一般ユーザーにダウンロードさせていた。
> 同ホームページへのアクセス回数は約145万回にも及んでいた。
> また、同男性は250タイトル以上、自宅サーバー内に複製していた
> 疑いだという。
> ACCSは、2000年1月に同男性のホームページを調査し、警告。
> 男性も謝罪メールを返送していたが、ホームページを細工し
> 不法アップロードを繰り返していたという。
> 死ねヽ(´ー｀)ノ死ね
http://www2u.biglobe.ne.jp/~m_dai/
参考：2001/05/12(土)00時34分29秒
＞ 2001/05/12 (土) 03:22:35 ◆ ▼ ◇ [mirai]> > 高校野球の頃から…と言う野球好きも多いな(;´Д`)
> 地方大会から注目してたよって言われてても(;´Д`)
カメラをでかくてもしてないだろ！って感じだよな(;´Д`)
参考：2001/05/12(土)03時19分52秒
＞ 2001/05/12 (土) 03:22:33 ◆ ▼ ◇ [mirai]> > <ここをクリック>
> > ￣￣￣￣￣￣￣
> <バナークリックお願いでござる>
> <バナークリックお願いでござる>
> <バナークリックお願いでござる>
吹いた
参考：2001/05/12(土)03時22分05秒
＞ 2001/05/12 (土) 03:22:15 ◆ ▼ ◇ [mirai]> > ｺｲｼゆんゆんとマミー両方に見事に引っかかったのか
> > アホだね
> > http://utenti.tripod.it/nyunyu/
> ゆんゆんって何よ？
新参は半年ROMな(;´Д`)
参考：2001/05/12(土)03時21分53秒
＞ 2001/05/12 (土) 03:22:05 ◆ ▼ ◇ [mirai]> > <xmp>
> <ここをクリック>
> ￣￣￣￣￣￣￣
<バナークリックお願いでござる>
<バナークリックお願いでござる>
<バナークリックお願いでござる>
参考：2001/05/12(土)03時19分18秒
＞ 2001/05/12 (土) 03:21:53 ◆ ▼ ◇ [mirai]> ｺｲｼゆんゆんとマミー両方に見事に引っかかったのか
> アホだね
> http://utenti.tripod.it/nyunyu/
ゆんゆんって何よ？
参考：2001/05/12(土)03時19分18秒
投稿者：地蔵 2001/05/12 (土) 03:20:31 ◆ ▼ ◇ [mirai](´Д`)＜♪やがて漏れは鳥になり 必殺技を繰り出す～
2001/05/12 (土) 03:20:18 ◆ ▼ ◇ [mirai]てが多いな(;´Д`)ない方の手って事で
＞ 2001/05/12 (土) 03:19:55 ◆ ▼ ◇ [mirai]> ｺｲｼゆんゆんとマミー両方に見事に引っかかったのか
> アホだね
> http://utenti.tripod.it/nyunyu/
ふーみゅ(´￢`)
参考：2001/05/12(土)03時19分18秒
＞ 2001/05/12 (土) 03:19:52 ◆ ▼ ◇ [mirai]> > zakzakの無能さは異常(`Д´)
> > 「僕はこんなに早くから○○のことを知っていたんだゾ」ってのは
> > 一般のアイドル好きや音楽好きにも言えることじゃないか(`Д´)
> 高校野球の頃から…と言う野球好きも多いな(;´Д`)
地方大会から注目してたよって言われてても(;´Д`)
参考：2001/05/12(土)03時17分03秒
＞ 2001/05/12 (土) 03:19:47 ◆ ▼ ◇ [mirai]> > zakzakの無能さは異常(`Д´)
> > 「僕はこんなに早くから○○のことを知っていたんだゾ」ってのは
> > 一般のアイドル好きや音楽好きにも言えることじゃないか(`Д´)
> 高校野球の頃から…と言う野球好きも多いな(;´Д`)
子役の時は…と言う子供好きも多いな(;´Д`)
参考：2001/05/12(土)03時17分03秒
＞ 2001/05/12 (土) 03:19:35 ◆ ▼ ◇ [mirai]> > 素直にreaddir()すれば済む話なのになぜｺｲｼは(;´Д`)
> 俺が作るとこうなります。
> エラー処理なんて糞食らえですよ
> opendir DH, '.';
> for (readdir DH) {
> ($folder) = $_ =~ /([^_]+)_.*/;
> mkdir $folder;
> rename $_, $folder."/".$_;
> }
.と..は除外する注意力を(;´Д`)
参考：2001/05/12(土)03時18分10秒
2001/05/12 (土) 03:19:18 ◆ ▼ ◇ [mirai]ｺｲｼゆんゆんとマミー両方に見事に引っかかったのか
アホだね
http://utenti.tripod.it/nyunyu/
＞ 2001/05/12 (土) 03:19:18 ◆ ▼ ◇ [mirai]> <xmp>
<ここをクリック>
￣￣￣￣￣￣￣
参考：2001/05/12(土)03時18分35秒
2001/05/12 (土) 03:19:14 ◆ ▼ ◇ [mirai]ジモン殺してくるε＝≡ヽ(´ー`)ノ
＞ 2001/05/12 (土) 03:18:46 ◆ ▼ ◇ [mirai]> > ズレてるよ
> ずれてないよ
ごめんなさいごめんなさい(;´Д`)
ちょっと新参でちょっと自分中心主義なだけなんです
許してやってください(;´Д`)
参考：2001/05/12(土)03時12分54秒
2001/05/12 (土) 03:18:35 ◆ ▼ ◇ [mirai]<xmp>
2001/05/12 (土) 03:18:22 ◆ ▼ ◇ [mirai]Perlで書かれてもな
＞ 2001/05/12 (土) 03:18:10 ◆ ▼ ◇ [mirai]> > あったぞヽ(´ー｀)ノみなEndorno導入すれよな
> >
> > ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
> > 投稿者： 投稿日：2001/03/23(金)21時21分45秒
> > #! perl.exe
> >
> > # ./ファイル名連番.拡張子 形式のファイルを
> > # ./ファイル名/ファイル名連番.拡張子 に振り分ける
> >
> > use strict;
> > use IO;
> > use Win32API::File(":Func");
> > use Cwd("getcwd");
> 素直にreaddir()すれば済む話なのになぜｺｲｼは(;´Д`)
俺が作るとこうなります。
エラー処理なんて糞食らえですよ
opendir DH, '.';
for (readdir DH) {
($folder) = $_ =~ /([^_]+)_.*/;
mkdir $folder;
rename $_, $folder."/".$_;
}
参考：2001/05/12(土)03時15分56秒
2001/05/12 (土) 03:17:40 ◆ ▼ ◇ [mirai]ｷﾞｽｷﾞｽしてまいりました(^O^)
＞ 2001/05/12 (土) 03:17:08 ◆ ▼ ◇ [mirai]> > (失笑)
> ｱﾌﾟやめたヽ(´ー｀)ノ
あらら、キレちゃった（爆笑）
参考：2001/05/12(土)03時15分47秒
＞ 2001/05/12 (土) 03:17:03 ◆ ▼ ◇ [mirai]> > 「彼らにしてみれば、渋谷や池袋の金髪コギャルは恐い存在。身近にいる妹のよう
> > な存在がいい。彼らは“初物好き”なので『僕はこんなに早くから○○ちゃんを
> > 知っていたんだゾ』と自慢したいことが低年齢化につながっている」
> > (;´Д`)
> > http://www.zakzak.co.jp/top/top0511_2_05.html
> zakzakの無能さは異常(`Д´)
> 「僕はこんなに早くから○○のことを知っていたんだゾ」ってのは
> 一般のアイドル好きや音楽好きにも言えることじゃないか(`Д´)
高校野球の頃から…と言う野球好きも多いな(;´Д`)
参考：2001/05/12(土)03時01分48秒
＞ 2001/05/12 (土) 03:17:03 ◆ ▼ ◇ [mirai]> > ケンカ強さが腕っ節だけで決まると思っている高校生は寝ろ
> 熱くなるなよ
すがすがしいことだぜ・・・・
参考：2001/05/12(土)03時15分42秒
＞ 2001/05/12 (土) 03:16:54 ◆ ▼ ◇ [mirai]> > (失笑)
> ｱﾌﾟやめたヽ(´ー｀)ノ
(嘲笑)
参考：2001/05/12(土)03時15分47秒
2001/05/12 (土) 03:16:53 ◆ ▼ ◇ [mirai]柔道余談？
＞ 2001/05/12 (土) 03:16:46 ◆ ▼ ◇ [mirai]> > 芸能人の定義によるかも
> > 元格闘家のタレントを除外するのかどうか
> ケンカ強さが腕っ節だけで決まると思っている高校生は寝ろ
喧嘩は場慣れだからな(;´Д`)
参考：2001/05/12(土)03時14分27秒
2001/05/12 (土) 03:16:45 ◆ ▼ ◇ [mirai]IRCだけの流行語やしきたりがあるからな。
1ヶ月ほど行ってないが「布」「えなり」はまだ大丈夫だろう。
森羅万象は布に通じ、芸能界のドンはえなりかずきだ。
何か分からない単語が出たら「***は布だしな」とでも言えば
みんなの話に加われるだろう。
＞ 2001/05/12 (土) 03:16:24 ◆ ▼ ◇ [mirai]> > 芸能人の定義によるかも
> > 元格闘家のタレントを除外するのかどうか
> ケンカ強さが腕っ節だけで決まると思っている高校生は寝ろ
よくわからんが、貴殿も一緒に寝てくれ(´ー｀)
参考：2001/05/12(土)03時14分27秒
＞ 2001/05/12 (土) 03:15:56 ◆ ▼ ◇ [mirai]> あったぞヽ(´ー｀)ノみなEndorno導入すれよな
>
> ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
> 投稿者： 投稿日：2001/03/23(金)21時21分45秒
> #! perl.exe
>
> # ./ファイル名連番.拡張子 形式のファイルを
> # ./ファイル名/ファイル名連番.拡張子 に振り分ける
>
> use strict;
> use IO;
> use Win32API::File(":Func");
> use Cwd("getcwd");
素直にreaddir()すれば済む話なのになぜｺｲｼは(;´Д`)
参考：2001/05/12(土)03時08分42秒
＞ 2001/05/12 (土) 03:15:47 ◆ ▼ ◇ [mirai]> > いや、まじわかんね
> (失笑)
ｱﾌﾟやめたヽ(´ー｀)ノ
参考：2001/05/12(土)03時14分16秒
＞ 2001/05/12 (土) 03:15:42 ◆ ▼ ◇ [mirai]> > 芸能人の定義によるかも
> > 元格闘家のタレントを除外するのかどうか
> ケンカ強さが腕っ節だけで決まると思っている高校生は寝ろ
熱くなるなよ
参考：2001/05/12(土)03時14分27秒
＞ 2001/05/12 (土) 03:14:42 ◆ ▼ ◇ [mirai]> > ズレてるよ
> ずれてないよ
見るのではない。感じるのだ(ﾟДﾟ)
参考：2001/05/12(土)03時12分54秒
＞ 2001/05/12 (土) 03:14:27 ◆ ▼ ◇ [mirai]> > 芸能人で一番ケンカが強いのは誰!?
> 芸能人の定義によるかも
> 元格闘家のタレントを除外するのかどうか
ケンカ強さが腕っ節だけで決まると思っている高校生は寝ろ
参考：2001/05/12(土)03時13分29秒
＞ 2001/05/12 (土) 03:14:16 ◆ ▼ ◇ [mirai]> > (苦笑)
> いや、まじわかんね
(失笑)
参考：2001/05/12(土)03時13分42秒
＞ 2001/05/12 (土) 03:13:42 ◆ ▼ ◇ [mirai]> > どうやってつかうんだ？これ
> (苦笑)
いや、まじわかんね
参考：2001/05/12(土)03時12分19秒
＞ 2001/05/12 (土) 03:13:29 ◆ ▼ ◇ [mirai]> 芸能人で一番ケンカが強いのは誰!?
芸能人の定義によるかも
元格闘家のタレントを除外するのかどうか
参考：2001/05/12(土)03時01分30秒
＞ 2001/05/12 (土) 03:13:13 ◆ ▼ ◇ [mirai]> あったぞヽ(´ー｀)ノみなEndorno導入すれよな
>
> ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
> 投稿者： 投稿日：2001/03/23(金)21時21分45秒
> #! perl.exe
>
> # ./ファイル名連番.拡張子 形式のファイルを
> # ./ファイル名/ファイル名連番.拡張子 に振り分ける
>
> use strict;
> use IO;
> use Win32API::File(":Func");
> use Cwd("getcwd");
> our($sfile,$hdir,@sfiles);
> # ファイル名リスト取得
> $hdir = new IO::Dir(getcwd());
> foreach $sfile ($hdir->read()) {
> -d($sfile) || push(@sfiles,$sfile);
> }
> foreach $sfile (@sfiles) {
> # ファイル名、連番、拡張子に分割
> my($sfname,$nnumber,$ssfx) = ($sfile =~ m/(.*[^\d])(\d+)(\..*)$/);
> if (($sfname ne '')
> && ($ssfx ne '')
> && ($nnumber ne '')
> && (length($sfname . $nnumber . $ssfx) == length($sfile))) {
> # 全文字数分きちんと拾えておれば
> $sfname =~ s/_?$//;
> # 存在しなければmkdir()
> -d($sfname) || mkdir($sfname) || die "fault mkdir: $!";
> # ファイルをそこへ移動
> MoveFileEx($sfile,"${sfname}\\${sfile}",[]) || die "fault move $sfile: fileLastError()";
> STDOUT->print("$sfile move successed.\n");
> } else {
> # うまく分割できなかった
> STDOUT->print("$sfile match failed.\n");
> }
> # デバッグ用ウェイト
> # select(undef,undef,undef,0.2);
> }
> できたぞ。
> 昨日アプしたルータ設定スクリプトも使ってくれよな
> ヽ(´ー｀)ﾉ
> ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
ｸｽｺ(ﾟДﾟ)ﾏｼﾞｪｸｽｺ
つかこれ頼んだの漏れなのにすっかり忘れてて今頃思い出したんだよ(;´Д`)
参考：2001/05/12(土)03時08分42秒
2001/05/12 (土) 03:13:12 ◆ ▼ ◇ [mirai]凄いのが居るな(ﾟДﾟ;)
＞ 2001/05/12 (土) 03:12:54 ◆ ▼ ◇ [mirai]> >
> >
> > ／＼
> > ／ ＼／＼
> > |＼ ／ ＼／＼
> > ／＼ ＼|＼ ／ ＼／＼
> > ／ ＼ | ＼ |＼ ／ ＼／＼
> > |＼ ／| ＼ |＼ ／ ＼／＼
> > ／ ＼＼／ | ＼ |＼ ／ ＼／＼
> > ／ ＼| | ＼ |＼ ／ ＼／＼
> > |＼ ／| | ＼ |＼ ／ ＼
> > | ＼ ／／＼ ＼／ ＼
> > | |／ ＼ ／＼ >
> > | ＼ ／| ヽ(´Д` )ノ／ ＼ ／ |
> > | ＼ ／／＼ ／( ) ＼ ＼ ／ |
> > | |／ ＼ ／＼／ <ωヽミ３＼ ／ |／ |
> > | ＼ ／| ／＼／ ＼ ＼ ／ |／ |
> > | ＼ ／／＼／ ＼ ＼ ／ |／ |
> > | |／ ＼ ＼ ／ |／ |
> > | ＼ ＼ ／ |／ |
> > | ＼ ／|／ |
> > | ＼ ／ |
> > | | |
> > |
> > |
> > |
> ズレてるよ
ずれてないよ
参考：2001/05/12(土)03時11分32秒
＞ 2001/05/12 (土) 03:12:19 ◆ ▼ ◇ [mirai]> > ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
> どうやってつかうんだ？これ
(苦笑)
参考：2001/05/12(土)03時11分40秒
＞ 2001/05/12 (土) 03:11:40 ◆ ▼ ◇ [mirai]> あったぞヽ(´ー｀)ノみなEndorno導入すれよな
>
> ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
> 投稿者： 投稿日：2001/03/23(金)21時21分45秒
> #! perl.exe
>
> # ./ファイル名連番.拡張子 形式のファイルを
> # ./ファイル名/ファイル名連番.拡張子 に振り分ける
>
> use strict;
> use IO;
> use Win32API::File(":Func");
> use Cwd("getcwd");
> our($sfile,$hdir,@sfiles);
> # ファイル名リスト取得
> $hdir = new IO::Dir(getcwd());
> foreach $sfile ($hdir->read()) {
> -d($sfile) || push(@sfiles,$sfile);
> }
> foreach $sfile (@sfiles) {
> # ファイル名、連番、拡張子に分割
> my($sfname,$nnumber,$ssfx) = ($sfile =~ m/(.*[^\d])(\d+)(\..*)$/);
> if (($sfname ne '')
> && ($ssfx ne '')
> && ($nnumber ne '')
> && (length($sfname . $nnumber . $ssfx) == length($sfile))) {
> # 全文字数分きちんと拾えておれば
> $sfname =~ s/_?$//;
> # 存在しなければmkdir()
> -d($sfname) || mkdir($sfname) || die "fault mkdir: $!";
> # ファイルをそこへ移動
> MoveFileEx($sfile,"${sfname}\\${sfile}",[]) || die "fault move $sfile: fileLastError()";
> STDOUT->print("$sfile move successed.\n");
> } else {
> # うまく分割できなかった
> STDOUT->print("$sfile match failed.\n");
> }
> # デバッグ用ウェイト
> # select(undef,undef,undef,0.2);
> }
> できたぞ。
> 昨日アプしたルータ設定スクリプトも使ってくれよな
> ヽ(´ー｀)ﾉ
> ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
どうやってつかうんだ？これ
参考：2001/05/12(土)03時08分42秒
＞ 2001/05/12 (土) 03:11:32 ◆ ▼ ◇ [mirai]>
>
> ／＼
> ／ ＼／＼
> |＼ ／ ＼／＼
> ／＼ ＼|＼ ／ ＼／＼
> ／ ＼ | ＼ |＼ ／ ＼／＼
> |＼ ／| ＼ |＼ ／ ＼／＼
> ／ ＼＼／ | ＼ |＼ ／ ＼／＼
> ／ ＼| | ＼ |＼ ／ ＼／＼
> |＼ ／| | ＼ |＼ ／ ＼
> | ＼ ／／＼ ＼／ ＼
> | |／ ＼ ／＼ >
> | ＼ ／| ヽ(´Д` )ノ／ ＼ ／ |
> | ＼ ／／＼ ／( ) ＼ ＼ ／ |
> | |／ ＼ ／＼／ <ωヽミ３＼ ／ |／ |
> | ＼ ／| ／＼／ ＼ ＼ ／ |／ |
> | ＼ ／／＼／ ＼ ＼ ／ |／ |
> | |／ ＼ ＼ ／ |／ |
> | ＼ ＼ ／ |／ |
> | ＼ ／|／ |
> | ＼ ／ |
> | | |
> |
> |
> |
ズレてるよ
参考：2001/05/12(土)03時07分33秒
＞ 2001/05/12 (土) 03:11:25 ◆ ▼ ◇ [mirai]> > これは普通のｱﾆｵﾀよりひどいかもわからんね
> ｱｲｵﾀとﾍﾟﾄﾞが一体化(ﾟДﾟ)
ｱｲｵﾀ＝ﾍﾟﾄﾞの人とｱｲｵﾀ＝非ﾍﾟﾄﾞの人同士の会話は微妙に違う
参考：2001/05/12(土)03時04分07秒
＞ 2001/05/12 (土) 03:10:35 ◆ ▼ ◇ [mirai]> 低迷するメッツにニューヨーク番記者からは笑えない冗談まで飛び出した。日
> 本の報道陣に向かい「”シンジョー・ジンクス”じゃないのか？去年までシンジ
> ョーのいたハンシンも弱かったんだろ」と珍説を提唱。もちろんすぐ後に「ジョ
> ークだよ、ジョーク」と笑って否定したが…。
新庄が居なくなっても阪神は弱いままですが？
参考：2001/05/12(土)03時05分51秒
2001/05/12 (土) 03:10:30 ◆ ▼ ◇ [mirai]この番組は生放送なのか!?(;ﾟДﾟ)
上へ