#!/usr/bin/perl -w # # Checks to make sure you are root. use strict; use Debian::Debhelper::Dh_Lib; if ($< != 0) { error("You must run this as root (or use fakeroot)."); }