レス数が950を超えています。1000を超えると表示できなくなるよ。

初心者もＯＫ！ FreeBSD質問スレッド その８

[299:名無しさん＠お腹いっぱい。 (01/11/09 23:11)]
>>297
daily か weekly か monthly が動いているに100マダム。

[300:名無しさん＠お腹いっぱい。 (01/11/09 23:15)]
>>274
放置されてるようなので、俺様の卓越したプログラミングテクニックで助けてあげやう。

system("ifconfig tun0 | grep 'inet '> temp.txt");
open (INPUT, "temp.txt");
$ifconfig = <INPUT>;
close(INPUT);
while ($ifconfig =~ m/inet\D*([\d\.]*)/) {
$IP= $1;
$ifconfig = $';
}
print "IP = $IP\n";

この美しいプログラムを存分に参考にするがいい(笑)

[301:名無しさん＠お腹いっぱい。 (01/11/10 02:01)]
>>300
まじで参考にするやつがいるかもしれんから注意:
絶対に真似してはいけません。

>>274
chomp($IP=`ifconfig tun0|awk '\$1 == "inet" {print \$2}'`);
とかどうだ。

[302:名無しさん＠お腹いっぱい。 (01/11/10 02:03)]
>>300
このぐらいなら、3行。

use NetAddr::IP;
my $ip = new NetAddr::IP 'tun0';
print $ip->addr;

[303:名無しさん＠お腹いっぱい。 (01/11/10 02:28)]
>>302
ports使うのずるい!

[304:名無しさん＠お腹いっぱい。 (01/11/10 02:33)]
>>303
ports の意味が分ってる？

[305:名無しさん＠お腹いっぱい。 (01/11/10 02:36)]
>>304
彼はportsをつかわないとpmのinstallができないのれす。

[306:名無しさん＠お腹いっぱい。 (01/11/10 02:36)]
>>304
system標準の機能でスクリプト書いて遊んでたんじゃないの?
NetAddr::IPは/usr/port/net/p5-NetAddr-IP/でしょ。

[307:304 (01/11/10 02:43)]
>>306
> NetAddr::IPは/usr/port/net/p5-NetAddr-IP/でしょ。

いや、いいたかったのは>>305の言う通り、 Perl Module を ports と呼ぶのは、
だいぶ変でわ？ってことでした。

[308:303=306 (01/11/10 02:53)]
たしかに変だね。
なぜ「さーどぱーてぃせいそふとうぇあ」と言わずに「ports」と言ってしまった
のかは、今日はもう眠いから夢の中で考えることにしよう。

read.cgi ver5.26+ (01/10/21-)