dh_testroot

   1 #!/usr/bin/perl -w
   2
   3 =head1 NAME
   4
   5 dh_testroot - ensure that a package is built as root
   6
   7 =head1 SYNOPSIS
   8
   9 B<dh_testroot> [S<I<debhelper options>>]
  10
  11 =head1 DESCRIPTION
  12
  13 B<dh_testroot> simply checks to see if you are root. If not, it exits with an
  14 error. Debian packages must be built as root, though you can use
  15 L<fakeroot(1)>
  16
  17 =cut
  18
  19 use strict;
  20 use Debian::Debhelper::Dh_Lib;
  21 inhibit_log();
  22
  23 if ($< != 0) {
  24         error("You must run this as root (or use fakeroot).");
  25 }
  26
  27 =head1 SEE ALSO
  28
  29 L<debhelper(7)>
  30
  31 This program is a part of debhelper.
  32
  33 =head1 AUTHOR
  34
  35 Joey Hess <joeyh@debian.org>
  36
  37 =cut