Bug 86378 - New port: sysutils/p5-Filesys-DiskUsage
Summary: New port: sysutils/p5-Filesys-DiskUsage
Status: Closed FIXED
Alias: None
Product: Ports & Packages
Classification: Unclassified
Component: Individual Port(s) (show other bugs)
Version: Latest
Hardware: Any Any
: Normal Affects Only Me
Assignee: freebsd-ports-bugs (Nobody)
URL:
Keywords:
Depends on:
Blocks:
 
Reported: 2005-09-20 19:40 UTC by Alex Deiter
Modified: 2005-09-22 14:33 UTC (History)
0 users

See Also:


Attachments
file.shar (2.13 KB, text/plain)
2005-09-20 19:40 UTC, Alex Deiter
no flags Details

Note You need to log in before you can comment on or make changes to this bug.
Description Alex Deiter 2005-09-20 19:40:06 UTC
New port: sysutils/p5-Filesys-DiskUsage

Filesys::DiskUsage - Estimate file space usage (similar to `du`)
Comment 1 Marcus Alves Grando freebsd_committer freebsd_triage 2005-09-20 20:31:51 UTC
Responsible Changed
From-To: freebsd-ports-bugs->mnag

I'll take it
Comment 2 Marcus Alves Grando freebsd_committer freebsd_triage 2005-09-21 04:43:17 UTC
Responsible Changed
From-To: mnag->freebsd-ports-bugs

Back to pool.
Comment 3 Anton Berezin 2005-09-21 07:50:14 UTC
On Tue, Sep 20, 2005 at 06:39:49PM +0000, Alex Deiter wrote:
> New port: sysutils/p5-Filesys-DiskUsage
> 
> Filesys::DiskUsage - Estimate file space usage (similar to `du`)

Have you tested it with perl 5.005_03 on FreeBSD 4.X?

===>  Configuring for p5-Filesys-DiskUsage-0.02
*** Error code 2

Stop in /usr/ports/sysutils/p5-Filesys-DiskUsage.
Can't locate warnings.pm in @INC (@INC contains:
/usr/local/lib/perl5/site_perl/5.005/i386-freebsd
/usr/local/lib/perl5/site_perl/5.005 . /usr/libdata/perl/5.00503/mach
/usr/libdata/perl/5.00503) at ./Makefile.PL line 2.
BEGIN failed--compilation aborted at ./Makefile.PL line 2.

\Anton.
-- 
An undefined problem has an infinite number of solutions.
-- Robert A. Humphrey
Comment 4 Alex Deiter 2005-09-21 14:11:53 UTC
I am sorry. Here correct shar acrhive.
Tested on FreeBSD 5.3 & 4.8.

Thanks a lot!
Comment 5 Alex Deiter 2005-09-21 14:12:06 UTC
I am sorry. Here correct shar acrhive.
Tested on FreeBSD 5.3 & 4.8.

# This is a shell archive.  Save it in a file, remove anything before
# this line, and then unpack it by entering "sh file".  Note, it may
# create directories; files and directories will be owned by you and
# have default permissions.
#
# This archive contains:
#
#	p5-Filesys-DiskUsage
#	p5-Filesys-DiskUsage/pkg-plist
#	p5-Filesys-DiskUsage/pkg-descr
#	p5-Filesys-DiskUsage/distinfo
#	p5-Filesys-DiskUsage/Makefile
#	p5-Filesys-DiskUsage/files
#	p5-Filesys-DiskUsage/files/patch-aa
#
echo c - p5-Filesys-DiskUsage
mkdir -p p5-Filesys-DiskUsage > /dev/null 2>&1
echo x - p5-Filesys-DiskUsage/pkg-plist
sed 's/^X//' >p5-Filesys-DiskUsage/pkg-plist << 'END-of-p5-Filesys-DiskUsage/pkg-plist'
X%%SITE_PERL%%/%%PERL_ARCH%%/auto/Filesys/DiskUsage/.packlist
X%%SITE_PERL%%/Filesys/DiskUsage.pm
X@dirrm %%SITE_PERL%%/%%PERL_ARCH%%/auto/Filesys/DiskUsage
X@dirrm %%SITE_PERL%%/%%PERL_ARCH%%/auto/Filesys
X@dirrm %%SITE_PERL%%/Filesys
END-of-p5-Filesys-DiskUsage/pkg-plist
echo x - p5-Filesys-DiskUsage/pkg-descr
sed 's/^X//' >p5-Filesys-DiskUsage/pkg-descr << 'END-of-p5-Filesys-DiskUsage/pkg-descr'
XFilesys::DiskUsage - Estimate file space usage (similar to `du`)
X
XWWW: http://search.cpan.org/dist/Filesys-DiskUsage/
END-of-p5-Filesys-DiskUsage/pkg-descr
echo x - p5-Filesys-DiskUsage/distinfo
sed 's/^X//' >p5-Filesys-DiskUsage/distinfo << 'END-of-p5-Filesys-DiskUsage/distinfo'
XMD5 (Filesys-DiskUsage-0.02.tar.gz) = 30ebd7b251c0a0ab35db8791c53c9760
XSIZE (Filesys-DiskUsage-0.02.tar.gz) = 3174
END-of-p5-Filesys-DiskUsage/distinfo
echo x - p5-Filesys-DiskUsage/Makefile
sed 's/^X//' >p5-Filesys-DiskUsage/Makefile << 'END-of-p5-Filesys-DiskUsage/Makefile'
X# New ports collection makefile for:	sysutils/p5-Filesys-DiskUsage
X# Date created:				20 September 2005
X# Whom:					Alex Deiter <tiamat@komi.mts.ru>
X#
X# $FreeBSD: ports/sysutils/p5-Filesys-DiskUsage/Makefile,v 1.1 2005/09/20 22:17:22 tiamat Exp $
X#
X
XPORTNAME=	Filesys-DiskUsage
XPORTVERSION=	0.02
XCATEGORIES=	sysutils perl5
XMASTER_SITES=	${MASTER_SITE_PERL_CPAN}
XMASTER_SITE_SUBDIR=	Filesys
XPKGNAMEPREFIX=	p5-
X
XMAINTAINER=	tiamat@komi.mts.ru
XCOMMENT=	Perl equivalent of du(1)
X
XPERL_CONFIGURE=	yes
X
XMAN3=		Filesys::DiskUsage.3
X
X.include <bsd.port.pre.mk>
X
X.if ${PERL_LEVEL} < 500600
Xpost-patch:
X	@${RM} ${WRKSRC}/lib/Filesys/DiskUsage.pm.orig
X	@${PERL} -pi -e '$$_ = "" if /use warnings;/;' \
X		-e 's/^our\s+([\$$\@\%]\w+)/use vars qw($$1); $$1/;' \
X		${WRKSRC}/lib/Filesys/DiskUsage.pm \
X		${WRKSRC}/Makefile.PL
X.endif
X
X.include <bsd.port.post.mk>
END-of-p5-Filesys-DiskUsage/Makefile
echo c - p5-Filesys-DiskUsage/files
mkdir -p p5-Filesys-DiskUsage/files > /dev/null 2>&1
echo x - p5-Filesys-DiskUsage/files/patch-aa
sed 's/^X//' >p5-Filesys-DiskUsage/files/patch-aa << 'END-of-p5-Filesys-DiskUsage/files/patch-aa'
X--- lib/Filesys/DiskUsage.pm.orig	Wed Jan 19 13:51:52 2005
X+++ lib/Filesys/DiskUsage.pm	Wed Sep 21 15:02:35 2005
X@@ -55,7 +55,7 @@
X   # get a hash
X   %sizes = du( { 'make-hash' => 1 }, @files_and_directories );
X 
X-=head1 FUNCTIONS
X+=head1 DESCRIPTION
X 
X =head2 du
X 
X@@ -69,7 +69,7 @@
X 
X   $total = du(qw/file1 directory1/);
X 
X-=head3 OPTIONS
X+=head2 OPTIONS
X 
X =over 6
X 
END-of-p5-Filesys-DiskUsage/files/patch-aa
exit

Thanks a lot!
Comment 6 Alex Deiter 2005-09-22 14:00:53 UTC
I am sorry. Here corrected shar archive.
Tested twice on FreeBSD 5.3 & 4.8.

# This is a shell archive.  Save it in a file, remove anything before
# this line, and then unpack it by entering "sh file".  Note, it may
# create directories; files and directories will be owned by you and
# have default permissions.
#
# This archive contains:
#
#	p5-Filesys-DiskUsage
#	p5-Filesys-DiskUsage/pkg-plist
#	p5-Filesys-DiskUsage/pkg-descr
#	p5-Filesys-DiskUsage/distinfo
#	p5-Filesys-DiskUsage/Makefile
#	p5-Filesys-DiskUsage/files
#	p5-Filesys-DiskUsage/files/patch-aa
#
echo c - p5-Filesys-DiskUsage
mkdir -p p5-Filesys-DiskUsage > /dev/null 2>&1
echo x - p5-Filesys-DiskUsage/pkg-plist
sed 's/^X//' >p5-Filesys-DiskUsage/pkg-plist << 'END-of-p5-Filesys-DiskUsage/pkg-plist'
X%%SITE_PERL%%/%%PERL_ARCH%%/auto/Filesys/DiskUsage/.packlist
X%%SITE_PERL%%/Filesys/DiskUsage.pm
X@dirrm %%SITE_PERL%%/%%PERL_ARCH%%/auto/Filesys/DiskUsage
X@dirrm %%SITE_PERL%%/%%PERL_ARCH%%/auto/Filesys
X@dirrm %%SITE_PERL%%/Filesys
END-of-p5-Filesys-DiskUsage/pkg-plist
echo x - p5-Filesys-DiskUsage/pkg-descr
sed 's/^X//' >p5-Filesys-DiskUsage/pkg-descr << 'END-of-p5-Filesys-DiskUsage/pkg-descr'
XFilesys::DiskUsage - Estimate file space usage (similar to `du`)
X
XWWW: http://search.cpan.org/dist/Filesys-DiskUsage/
END-of-p5-Filesys-DiskUsage/pkg-descr
echo x - p5-Filesys-DiskUsage/distinfo
sed 's/^X//' >p5-Filesys-DiskUsage/distinfo << 'END-of-p5-Filesys-DiskUsage/distinfo'
XMD5 (Filesys-DiskUsage-0.02.tar.gz) = 30ebd7b251c0a0ab35db8791c53c9760
XSIZE (Filesys-DiskUsage-0.02.tar.gz) = 3174
END-of-p5-Filesys-DiskUsage/distinfo
echo x - p5-Filesys-DiskUsage/Makefile
sed 's/^X//' >p5-Filesys-DiskUsage/Makefile << 'END-of-p5-Filesys-DiskUsage/Makefile'
X# New ports collection makefile for:	sysutils/p5-Filesys-DiskUsage
X# Date created:				20 September 2005
X# Whom:					Alex Deiter <tiamat@komi.mts.ru>
X#
X# $FreeBSD: ports/sysutils/p5-Filesys-DiskUsage/Makefile,v 1.1 2005/09/20 22:17:22 tiamat Exp $
X#
X
XPORTNAME=	Filesys-DiskUsage
XPORTVERSION=	0.02
XCATEGORIES=	sysutils perl5
XMASTER_SITES=	${MASTER_SITE_PERL_CPAN}
XMASTER_SITE_SUBDIR=	Filesys
XPKGNAMEPREFIX=	p5-
X
XMAINTAINER=	tiamat@komi.mts.ru
XCOMMENT=	Perl equivalent of du(1)
X
XPERL_CONFIGURE=	yes
X
XMAN3=		Filesys::DiskUsage.3
X
X.include <bsd.port.pre.mk>
X
Xpost-patch:
X	@${RM} ${WRKSRC}/lib/Filesys/DiskUsage.pm.orig
X.if ${PERL_LEVEL} < 500600
X	@${PERL} -pi -e '$$_ = "" if /use warnings;/;' \
X		-e 's/^our\s+([\$$\@\%]\w+)/use vars qw($$1); $$1/;' \
X		${WRKSRC}/lib/Filesys/DiskUsage.pm \
X		${WRKSRC}/Makefile.PL
X.endif
X
X.include <bsd.port.post.mk>
END-of-p5-Filesys-DiskUsage/Makefile
echo c - p5-Filesys-DiskUsage/files
mkdir -p p5-Filesys-DiskUsage/files > /dev/null 2>&1
echo x - p5-Filesys-DiskUsage/files/patch-aa
sed 's/^X//' >p5-Filesys-DiskUsage/files/patch-aa << 'END-of-p5-Filesys-DiskUsage/files/patch-aa'
X--- lib/Filesys/DiskUsage.pm.orig	Wed Jan 19 13:51:52 2005
X+++ lib/Filesys/DiskUsage.pm	Wed Sep 21 15:02:35 2005
X@@ -55,7 +55,7 @@
X   # get a hash
X   %sizes = du( { 'make-hash' => 1 }, @files_and_directories );
X 
X-=head1 FUNCTIONS
X+=head1 DESCRIPTION
X 
X =head2 du
X 
X@@ -69,7 +69,7 @@
X 
X   $total = du(qw/file1 directory1/);
X 
X-=head3 OPTIONS
X+=head2 OPTIONS
X 
X =over 6
X 
END-of-p5-Filesys-DiskUsage/files/patch-aa
exit

Thanks a lot!
Comment 7 Anton Berezin freebsd_committer freebsd_triage 2005-09-22 14:33:11 UTC
State Changed
From-To: open->closed

New port added, thanks!