[Bug 1281292] Re: File::Pid bug with Perl = 5.12
** Bug watch added: CPAN RT #18960 http://rt.cpan.org/Ticket/Display.html?id=18960 -- You received this bug notification because you are a member of Ubuntu Bugs, which is subscribed to Ubuntu. https://bugs.launchpad.net/bugs/1281292 Title: File::Pid bug with Perl = 5.12 To manage notifications about this bug go to: https://bugs.launchpad.net/ubuntu/+source/libfile-pid-perl/+bug/1281292/+subscriptions -- ubuntu-bugs mailing list ubuntu-bugs@lists.ubuntu.com https://lists.ubuntu.com/mailman/listinfo/ubuntu-bugs
[Bug 1281292] Re: File::Pid bug with Perl = 5.12
Test case:
denny@serenity:~$ cat file-pid-go-boom.pl
#!/usr/bin/env perl
use strict;
use warnings;
use 5.012;
use File::Pid;
my $pidfile = File::Pid-new({
file = '/tmp/file-pid-go-boom.pid',
});
if ( my $num = $pidfile-running ) {
die Already running: $num\n;
}
$pidfile-write;
say 'Hey, it worked!';
$pidfile-remove;
denny@serenity:~$ head -123 /usr/local/share/perl/5.14.2/File/Pid.pm | tail -2
my $pid = $self-_get_pid_from_file;
#my $pid = $self-_get_pid_from_file or return undef;
denny@serenity:~$ perl file-pid-go-boom.pl
Can't kill a non-numeric process ID at /usr/local/share/perl/5.14.2/File/Pid.pm
line 125.
denny@serenity:~$ head -123 /usr/local/share/perl/5.14.2/File/Pid.pm | tail -2
#my $pid = $self-_get_pid_from_file;
my $pid = $self-_get_pid_from_file or return undef;
denny@serenity:~$ perl file-pid-go-boom.pl
Hey, it worked!
denny@serenity:~$
--
You received this bug notification because you are a member of Ubuntu
Bugs, which is subscribed to Ubuntu.
https://bugs.launchpad.net/bugs/1281292
Title:
File::Pid bug with Perl = 5.12
To manage notifications about this bug go to:
https://bugs.launchpad.net/ubuntu/+source/libfile-pid-perl/+bug/1281292/+subscriptions
--
ubuntu-bugs mailing list
ubuntu-bugs@lists.ubuntu.com
https://lists.ubuntu.com/mailman/listinfo/ubuntu-bugs
[Bug 1281292] Re: File::Pid bug with Perl = 5.12
Interesting about the debian/ubuntu versions! All I can say is that the first time I wrote code using File::Pid, it worked on my home machine (Ubuntu 10.04 I think) but failed when deployed on my server (CentOS), and it took me ages to find that RT bug report which explained why. This has continued to be the case up until quite recently - moving to a new CentOS server a few months ago threw me all over again, having had over a year to forget the problem, as my home machine (now with Ubuntu 12.04) still worked fine. The comments on that RT report claim that Debian/Ubuntu had patched, which I assumed to be the reason for the difference between my home machine and server, although I'm not sure if I ever actually checked the relevant line in the module. -- You received this bug notification because you are a member of Ubuntu Bugs, which is subscribed to Ubuntu. https://bugs.launchpad.net/bugs/1281292 Title: File::Pid bug with Perl = 5.12 To manage notifications about this bug go to: https://bugs.launchpad.net/ubuntu/+source/libfile-pid-perl/+bug/1281292/+subscriptions -- ubuntu-bugs mailing list ubuntu-bugs@lists.ubuntu.com https://lists.ubuntu.com/mailman/listinfo/ubuntu-bugs
Re: [Pkg-perl-maintainers] [Bug 1281292] Re: File::Pid bug with Perl = 5.12
On Mon, 17 Feb 2014 22:04:24 -, Denny de la Haye wrote: Test case: Thanks! denny@serenity:~$ head -123 /usr/local/share/perl/5.14.2/File/Pid.pm | tail -2 my $pid = $self-_get_pid_from_file; #my $pid = $self-_get_pid_from_file or return undef; denny@serenity:~$ perl file-pid-go-boom.pl Can't kill a non-numeric process ID at /usr/local/share/perl/5.14.2/File/Pid.pm line 125. denny@serenity:~$ head -123 /usr/local/share/perl/5.14.2/File/Pid.pm | tail -2 #my $pid = $self-_get_pid_from_file; my $pid = $self-_get_pid_from_file or return undef; denny@serenity:~$ perl file-pid-go-boom.pl Hey, it worked! denny@serenity:~$ Well, yes, I'm not surprised that you see a problem if you undo the patch in a local copy (or an install from CPAN?) of the file under /usr/local :) Can you please - check that you have libfile-pid-perl 1.01-1 installed - and look in /usr/share/perl5/File/Pid.pm ? % head -123 /usr/share/perl5/File/Pid.pm | tail -2 my $pid = $self-_get_pid_from_file or return undef; Cheers, gregor -- .''`. Homepage: http://info.comodo.priv.at/ - OpenPGP key 0xBB3A68018649AA06 : :' : Debian GNU/Linux user, admin, and developer - http://www.debian.org/ `. `' Member of VIBE!AT SPI, fellow of the Free Software Foundation Europe `- NP: Ostbahn-Kurti Die Chefpartie: Radl Noch Rio -- You received this bug notification because you are a member of Ubuntu Bugs, which is subscribed to Ubuntu. https://bugs.launchpad.net/bugs/1281292 Title: File::Pid bug with Perl = 5.12 To manage notifications about this bug go to: https://bugs.launchpad.net/ubuntu/+source/libfile-pid-perl/+bug/1281292/+subscriptions -- ubuntu-bugs mailing list ubuntu-bugs@lists.ubuntu.com https://lists.ubuntu.com/mailman/listinfo/ubuntu-bugs
[Bug 1281292] Re: File::Pid bug with Perl = 5.12
Oooops. I do not have libfile-pid-perl installed, sorry to have bothered you! ** Changed in: libfile-pid-perl (Ubuntu) Status: New = Invalid -- You received this bug notification because you are a member of Ubuntu Bugs, which is subscribed to Ubuntu. https://bugs.launchpad.net/bugs/1281292 Title: File::Pid bug with Perl = 5.12 To manage notifications about this bug go to: https://bugs.launchpad.net/ubuntu/+source/libfile-pid-perl/+bug/1281292/+subscriptions -- ubuntu-bugs mailing list ubuntu-bugs@lists.ubuntu.com https://lists.ubuntu.com/mailman/listinfo/ubuntu-bugs
Re: [Pkg-perl-maintainers] [Bug 1281292] Re: File::Pid bug with Perl = 5.12
On Mon, 17 Feb 2014 22:46:08 -, Denny de la Haye wrote: Oooops. I do not have libfile-pid-perl installed, sorry to have bothered you! No worries, glad to see that we have solved the miracle :) Cheers, gregor -- .''`. Homepage: http://info.comodo.priv.at/ - OpenPGP key 0xBB3A68018649AA06 : :' : Debian GNU/Linux user, admin, and developer - http://www.debian.org/ `. `' Member of VIBE!AT SPI, fellow of the Free Software Foundation Europe `- NP: Neerstroem: Kleiner Mond -- You received this bug notification because you are a member of Ubuntu Bugs, which is subscribed to Ubuntu. https://bugs.launchpad.net/bugs/1281292 Title: File::Pid bug with Perl = 5.12 To manage notifications about this bug go to: https://bugs.launchpad.net/ubuntu/+source/libfile-pid-perl/+bug/1281292/+subscriptions -- ubuntu-bugs mailing list ubuntu-bugs@lists.ubuntu.com https://lists.ubuntu.com/mailman/listinfo/ubuntu-bugs
