#/usr/bin/perl
#included by zypper-aptitude

my %pkgmap=qw(
dnsmasq-base		dnsmasq
iputils-ping		iputils
libldap2-devel		openldap2-devel
libsasl2-devel		cyrus-sasl-devel
locate			findutils-locate
open-iscsi-utils	open-iscsi
openssh-server		openssh
pep8			python-pep8
pylint			python-pylint
python-cherrypy3	python-CherryPy
python-cheetah		python-Cheetah
python-gflags		python-python-gflags
python-libvirt		libvirt-python
python-libxml2		libxml2-python
python-migrate		python-sqlalchemy-migrate
python-mysqldb		python-mysql
python-pysqlite2	python-pysqlite
python-setuptools	python-distribute
vim-nox			vim
);

foreach(@ARGV) {
	s/-dev$/-devel/;
	my $p=$pkgmap{$_};
	if($p) {s/^$_/$p/}
}
