Re: [sisyphus] Кто силен в Перле ?

[Vladimir Lettiev <crux@gorodmasterov.com>]

[-- Attachment #1: Type: text/plain, Size: 783 bytes --]

Arioch пишет:
> Хотел попробовать FUSE FTP
> Сам я в Перле ни бум-бум :(
> 
> sudo cpan -i Fuse

Попробуйте лучше cpan2rpm и собирайте как rpm.

> Выдает кучу warnings на unused variables, потом
> 
> test/getattr.....NOK 28
> #     Failed test (test/getattr.t at line 41)
> #          got: '33188 1 0 0 0 0 1135439141 1135439141 1135439141 131072 0'
> #     expected: '33188 1 0 0 0 0 1135439141 1135439141 1135439141 4096 0'
> # Looks like you failed 1 test of 28.
> 
> Никто больше не пробовал? Ждать пока поправят ?

Не воспроизводится.

Хотя для корректного запуска тестов напильник потребовался:

# apt-get install libfuse-devel kernel-modules-fuse-std26-up
# control fusermount public
И патчик (приаттачил).

-- 
С уважением, Владимир Леттиев aka crux <crux@gorodmasterov.com>

[-- Attachment #2: mount.t.patch --]
[-- Type: text/x-patch, Size: 271 bytes --]

--- test/s/mount.t.orig
+++ test/s/mount.t
@@ -12,7 +12,7 @@
 	mkdir $_point;
 	mkdir $_real;
 	`echo $$ >test/s/mounted.pid`;
-	exec("perl $_loop $_point");
+	exec("perl -Iblib/lib -Iblib/arch/auto/Fuse $_loop $_point");
 	exit(1);
 }
 select(undef, undef, undef, 0.5);