Таки решился выложить tips...

[madskull]

Собственно, вот.

Это не FAQ, не систематизированный сборник решений... В общем, там написано.

[serg_sk]

Очень познавательно. Особенно про перл и баш ну эт как по мне .

[alv]

Про Perl и Palm - не мне судить, а остальное - очень полезно. В мега-фак?

[serg_sk]

Для alv:
Ага, туда его

[madskull]

Всегда пожалуйста.
Я только рад, что это кому-то поможет.

[t.t]

Я только рад, что это кому-то поможет.

↑

:thumbsup: Думаю, это много кому поможет.

[Demimurych]

поп оводу размонтирования CD занятого процессом
Совет
fuser -k -m /mnt/cdrom - убить процессы использующие /mnt/cdrom
umount /mnt/cdrom

Так вот у меня с переходом на 2 6 0 ядро это не работает.
Точнее fuser показывает что устройсвто занято самой mount
на попытки пристерелить это процесс отвечает - болт тебе парень делай анмаунт
анмоунт пишет устройство занято. Прыганьем с бубном в одной руке и lsof в другой все же находишь кто кроме mount занимает устройство.
кто нибудь копался разбирался в чем беда

[madskull]

Ну, так там же написано, что это могут быть и совсем древние решения.
Например, Strangerrr обнаружил, что опции монтирования fat тоже не работают.


madskull добавил в 11.04.2005 10:55

И вообще, я для CD пользуюсь supermount'ом, поэтому забыл уже когда его (сидюк) монтировал/размонтировал ручками.

[alv]

все же находишь кто кроме mount занимает устройство.
кто нибудь копался разбирался в чем беда

↑

У Дрю Лавинь (в онлайновой компьютерре) был описан простой способ, как найти файлы, используемые с CD (для примера) на предмет убиения и размонтирования

[mit]

в perl есть чтение файла в массив, можно добавить чтение в скаляр, часто полезно...

my $megastring = "";
{
local $/;
open(FH, "<$file") or die "Can't open [ $file ]: $!\n";
flock (FH,2); # paranoid
$megastring = <FH>;
close(FH);
}

[madskull]

в perl есть чтение файла в массив, можно добавить чтение в скаляр, часто полезно...

my $megastring = "";
{
    local $/;
    open(FH, "<$file") or die "Can't open [ $file ]: $!\n";
    flock (FH,2); # paranoid
    $megastring = <FH>;
    close(FH);
}

↑

А зачем local $/; ?

Я стараюсь избегать "чистых" файловых дескрипторов, поэтому для чтения файла в скаляр использую что-то вроде:

Код: Выделить всё

use FileHandle;
$s=join "", (new FileHandle("<test") || die $!)->getlines;

[mit]

в perl есть чтение файла в массив, можно добавить чтение в скаляр, часто полезно...

my $megastring = "";
{
    local $/;
    open(FH, "<$file") or die "Can't open [ $file ]: $!\n";
    flock (FH,2); # paranoid
    $megastring = <FH>;
    close(FH);
}

↑

А зачем local $/; ?

↑

потому что в свободном блоке {}
$/ имеет неопределенное значение только в блоке, за его пределами $/ имеет умолчальное значение "\n"
можно так

Код: Выделить всё

my $termout = $/; undef $/;
.... some code
$/ = $termout;

но зачем усложнять?

[Ciber SLasH]

Про Perl и Palm - не мне судить, а остальное - очень полезно. В мега-фак?

↑

А где этот ваш мега-фак ?

[zenwolf]

а мне советы понравились ,одназначно в фак

[t.t]

А где этот ваш мега-фак ?

↑

В "Проектах нашего форума".

[alv]

А где этот ваш мега-фак ?

↑

В "Проектах нашего форума".

↑

Кстати, нужно бы сделать там такой подраздел - мега-FAQ. После того, как доведем до ума начатое.

[t.t]

Кстати, нужно бы сделать там такой подраздел - мега-FAQ. После того, как доведем до ума начатое.

↑

Обязательно, и именно после того.