mirror of
https://git.FreeBSD.org/ports.git
synced 2024-12-04 01:48:54 +00:00
a56a8c6935
Some work/cleanup here would probably be desirable. I'm committing them now to give others the ability to reproduce these package splits and help with making these scripts better. The README should have some more documentation in the future. A better solution to the package set size problem would be to teach sysinstall to ask for the CD on which a particular package is when it needs to add it, but for now this will do. Requested by: murray Written by: steve Discussed with: steve, kris (some time ago)
16 lines
251 B
Perl
Executable File
16 lines
251 B
Perl
Executable File
#!/usr/bin/perl
|
|
# $FreeBSD$
|
|
|
|
die "$0 <pkgdir> <indexfile>\n" if ($#ARGV != 1);
|
|
|
|
$pkg_dir = shift(@ARGV);
|
|
|
|
while (<>) {
|
|
chomp;
|
|
@f = split(/\|/);
|
|
@deps = split(/\s+/, $f[8]);
|
|
foreach (@deps) {
|
|
print "$_\n" if (! -f "$pkg_dir/$_.tgz");
|
|
}
|
|
}
|