Perl 5.12.2 / FritzBox 7390 / FHEM

guylhem

Neuer User
Mitglied seit
1 Aug 2006
Beiträge
28
Punkte für Reaktionen
0
Punkte
0
Hello

Looks like there's a FHEM release which includes perl 5.12.2. I am mostly interested in perl - not FHEM at the moment.

I tried to extract it from the image (tar...) where it is stored as /opt/bin and /opt/lib, but even with LD_LIBRARY_PATH I can't start it - segfaults.

Strace :
open("/dev/urandom", O_RDONLY|O_LARGEFILE) = 3
read(3, "oI\330."..., 4) = 4
close(3) = 0
brk(0x587000) = 0x587000
brk(0x588000) = 0x588000
time([1303709931]) = 1303709931
brk(0x589000) = 0x589000
brk(0x58a000) = 0x58a000
brk(0x58b000) = 0x58b000
brk(0x58c000) = 0x58c000
brk(0x58d000) = 0x58d000
ioctl(0, TIOCNXCL, {B38400 opost isig icanon echo ...}) = 0
_llseek(0, 0, 0x7fee1398, SEEK_CUR) = -1 ESPIPE (Illegal seek)
ioctl(1, TIOCNXCL, {B38400 opost isig icanon echo ...}) = 0
_llseek(1, 0, 0x7fee1398, SEEK_CUR) = -1 ESPIPE (Illegal seek)
ioctl(2, TIOCNXCL, {B38400 opost isig icanon echo ...}) = 0
_llseek(2, 0, 0x7fee13b8, SEEK_CUR) = -1 ESPIPE (Illegal seek)
open("test.pl", O_RDONLY|O_LARGEFILE) = 3
ioctl(3, TIOCNXCL, 0x7fee1438) = -1 ENOTTY (Inappropriate ioctl for device)
_llseek(3, 0, [0], SEEK_CUR) = 0
fcntl64(3, F_SETFD, FD_CLOEXEC) = 0
rt_sigaction(SIGCHLD, NULL, {SIG_DFL, [], 0}, 16) = 0
--- SIGSEGV (Segmentation fault) @ 0 (0) ---
+++ killed by SIGSEGV +++

Anyone also playing with it also ?? Any idea besides installing FHEM? (which I can't do because it depends on a flash upgrade to 84.05.01 while only 84.04.88 is available for the international 7390)
 
It was simple - On firmware 04.88 the uclibc was .29 and on 05.01 it is .30. Putting the whole /lib from 05.01 as LD_LIBRARY works fine. See http://en.blog.guylhem.net/post/4999033393/perl-on-the-fritzbox-7390
Script :

#!/bin/sh
LD_LIBRARY_PATH=/var/media/ftp/Guylhem/opt/lib PERL5LIB=/var/media/ftp/Guylhem/opt/lib/perl5/5.12.2/:/var/media/ftp/Guylhem/opt/lib/perl5/site_perl/5.12.2/:/var/media/ftp/Guylhem/opt/lib/perl5/site_perl/ /var/media/ftp/Guylhem/opt/bin/perl $*
 
Hi.

Looking at your archive I'm wondering why you packed the AVM Libraries, too. Are you aware of the copyright/license issues?

Regards
Oliver
 
Holen Sie sich 3CX - völlig kostenlos!
Verbinden Sie Ihr Team und Ihre Kunden Telefonie Livechat Videokonferenzen

Gehostet oder selbst-verwaltet. Für bis zu 10 Nutzer dauerhaft kostenlos. Keine Kreditkartendetails erforderlich. Ohne Risiko testen.

3CX
Für diese E-Mail-Adresse besteht bereits ein 3CX-Konto. Sie werden zum Kundenportal weitergeleitet, wo Sie sich anmelden oder Ihr Passwort zurücksetzen können, falls Sie dieses vergessen haben.