for q in $(dpkg -l|grep ^.i|awk '{print $2}'); do x=0; for w in $(dpkg -L "$q"); do [ -f "$w" ] && df "$w"|grep -q " /$" && x=$(($x + $(du -x "$w" | awk '{print $1}') )); done; echo $x $q; done | tee packages
sort -n packages

Nokia-N900-02-8:/home/opt/root# apt-cache policy git-core
git-core:
  Installed: 1:1.6.6-1maemo1
  Candidate: 1:1.6.6-1maemo1
  Version table:
 *** 1:1.6.6-1maemo1 0
        500 http://repository.maemo.org fremantle/free Packages
        100 /var/lib/dpkg/status
     1:1.6.6-1maemo0 0
        500 http://repository.maemo.org fremantle/free Packages

#!/bin/sh

for q in $(dpkg -l|grep ^.i|awk '{print $2}'); do
  x=0
  for e in $( for w in $(dpkg -L "$q"); do [ -f "$w" ] && df "$w"|grep -q " /$" && stat -t "$w"; done | awk '{print $2, $8}'|sort -u|awk '{print $1}'); do
    x=$(($x + $e ))
  done
  echo $x $q
done