prezto/modules/dpkg/functions/apt-copy

#
# Generates a script that can be used to duplicate a dpkg-based system.
#
# Authors:
#   Daniel Bolton <danielbarrettbolton@gmail.com>
#   Sorin Ionescu <sorin.ionescu@gmail.com>
#

print '#!/bin/sh'"\n" > apt-copy.sh

list=$(perl -m'AptPkg::Cache' -e '$c=AptPkg::Cache->new; for (keys %$c){ push @a, $_ if $c->{$_}->{'CurrentState'} eq 'Installed';} print "$_ " for sort @a;')

print 'aptitude install '"$list\n" >> apt-copy.sh

chmod +x apt-copy.sh
Added or edited file headers. 2012-01-31 23:37:51 -05:00			`#`
			`# Generates a script that can be used to duplicate a dpkg-based system.`
			`#`
			`# Authors:`
			`# Daniel Bolton <danielbarrettbolton@gmail.com>`
			`# Sorin Ionescu <sorin.ionescu@gmail.com>`
			`#`

Moved hub into the git plugin. 2011-10-11 23:13:58 -04:00			`print '#!/bin/sh'"\n" > apt-copy.sh`

			`list=$(perl -m'AptPkg::Cache' -e '$c=AptPkg::Cache->new; for (keys %$c){ push @a, $_ if $c->{$_}->{'CurrentState'} eq 'Installed';} print "$_ " for sort @a;')`

			`print 'aptitude install '"$list\n" >> apt-copy.sh`

			`chmod +x apt-copy.sh`