#!/bin/sh
for x in *.changes; do
 [ -f "$x" ] || break
 PACKAGE="${x/_*}"
 ORIG="$(echo $x|sed 's/-[^_]*_[^_]*changes//')".orig.tar.gz
 FILES=$(sed  '1,/^Files:/d' $x|awk '{print $5}')
 echo processing: $PACKAGE
 mkdir -p $PACKAGE
 mv -v $x $FILES $PACKAGE
 [ -f $ORIG ] && mv -v $ORIG $PACKAGE
done