File perl-Devel-Trace-Fork.spec of Package perl-Devel-Trace-Fork

Overview Repositories Revisions Requests Users Attributes Meta

File perl-Devel-Trace-Fork.spec of Package perl-Devel-Trace-Fork (Revision 6c77bb3cddf76f2803567fdc88cfa591)

Currently displaying revision 6c77bb3cddf76f2803567fdc88cfa591 , Show latest

#
# spec file for package perl-Devel-Trace-Fork
#
# Copyright (c) 2012 SUSE LINUX Products GmbH, Nuernberg, Germany.
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
# upon. The license for this file, and modifications and additions to the
# file, is the same license as for the pristine package itself (unless the
# license for the pristine package is not an Open Source License, in which
# case the license is the MIT License). An "Open Source License" is a
# license that conforms to the Open Source Definition (Version 1.9)
# published by the Open Source Initiative.

# Please submit bugfixes or comments via http://bugs.opensuse.org/
#

Name:           perl-Devel-Trace-Fork
Version:        0.11
Release:        0
%define cpan_name Devel-Trace-Fork
Summary:        Devel::Trace-like output for multi-process programs
License:        Artistic-1.0 or GPL-1.0+
Group:          Development/Libraries/Perl
Url:            http://search.cpan.org/dist/Devel-Trace-Fork/
Source:         http://www.cpan.org/authors/id/M/MO/MOB/%{cpan_name}-%{version}.tar.gz
BuildArch:      noarch
BuildRoot:      %{_tmppath}/%{name}-%{version}-build
BuildRequires:  perl
BuildRequires:  perl-macros
BuildRequires:  perl(Devel::Trace) >= 0.10
Requires:       perl(Devel::Trace) >= 0.10
%{perl_requires}

%description
Like Mark Jason Dominus's the Devel::Trace manpage module, but debugging
output includes additional information like

* *

a high-resolution timestamp for the time each statement was executed

* *

the process id of the process that executes each statement

* *

the current value of the perlvar/"$CHILD_ERROR" variable ('$?')

This additional information can be helpful for debugging programs that make
use of the perlfunc/fork system call to run. For example, the 'Trace::Fork'
output of this program:

if (fork() == 0) {
        print "This is the child.\n";
        exit 0;
    }
    print "This is the parent.\n";

will be a file that looks something like:

/usr/bin/perl test
    1268025451 1268025451.815
    >>    0.816214:7996:0:test:1: if (fork() == 0) {
    >>    0.826566:7996:0:test:5: print "This is the parent.\n";
    >>    0.826684:9572:0:test:2:     print "This is the child.\n";
    >>    0.826941:9572:0:test:3:     exit 0;

%prep
%setup -q -n %{cpan_name}-%{version}
find . -type f -print0 | xargs -0 chmod 644

%build
%{__perl} Makefile.PL INSTALLDIRS=vendor
%{__make} %{?_smp_mflags}

%check
%{__make} test

%install
%perl_make_install
%perl_process_packlist
%perl_gen_filelist

%files -f %{name}.files
%defattr(-,root,root,755)
%doc Changes README

%changelog

Places

File perl-Devel-Trace-Fork.spec of Package perl-Devel-Trace-Fork (Revision 6c77bb3cddf76f2803567fdc88cfa591)

Places