diff options
author | Kristian Lyngstol <kristian@bohemians.org> | 2016-04-12 18:35:37 +0200 |
---|---|---|
committer | Kristian Lyngstol <kristian@bohemians.org> | 2016-04-12 18:35:37 +0200 |
commit | 5b42f93b5b0d33dc5c790991431b6282a5671bc9 (patch) | |
tree | e5c1868c9450cc1c964dbc8693be5cfff1dc0bca /extras/tools/deplist.sh | |
parent | c3d8b2fd890d7e486d8643957268c03df61657db (diff) |
Some housekeeping/reorganizing
moving things that need work into extras/
Diffstat (limited to 'extras/tools/deplist.sh')
-rwxr-xr-x | extras/tools/deplist.sh | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/extras/tools/deplist.sh b/extras/tools/deplist.sh new file mode 100755 index 0000000..cd2ecc0 --- /dev/null +++ b/extras/tools/deplist.sh @@ -0,0 +1,22 @@ +#!/bin/bash + +# Generate a dependency list for debian packages needed to work +# +# This is ... somewhat extensive. And a good incentive for people to clean +# up their mess. + +( +cat <<_EOF_ +use lib '../include'; +use lib '../web/streamlib'; +_EOF_ +find ../ -name '*pl' -exec egrep '^use ' {} \; | sort | uniq +cat <<_EOF_ +foreach my \$key (keys %INC) { + if (\$INC{\$key} =~ m/^\./) { + next; + } + print \$INC{\$key} . "\n"; +} +_EOF_ +) | perl 2>/dev/null | xargs realpath | xargs dpkg -S | awk '{print $1}' | sed 's/:$//' | sort | uniq |