Name

App::Munchies::Admin - Subroutines that run as the super user

Version

0.5.$Revision: 1192 $

Synopsis

   use App::Munchies::Admin;
   use English qw(-no_match_vars);

   my $prog = App::Munchies::Admin->new( appclass => q(App::Munchies),
                                         arglist  => q(e) );

   $EFFECTIVE_USER_ID  = 0; $REAL_USER_ID  = 0;
   $EFFECTIVE_GROUP_ID = 0; $REAL_GROUP_ID = 0;

   unless ($prog->is_authorised) {
      my $text = 'Permission denied to '.$prog->method.' for '.$prog->logname;

      $prog->error( $text );
      exit 1;
   }

   exit $prog->run;

Description

Inherits all from CatalystX::Usul::Admin

Subroutines/Methods

Diagnostics

Configuration and Environment

Dependencies

CatalystX::Usul::Admin

Incompatibilities

There are no known incompatibilities in this module

Bugs and Limitations

There are no known bugs in this module. Please report problems to the address below. Patches are welcome

Author

Peter Flanigan, <Support at RoxSoft.co.uk>

License and Copyright

Copyright (c) 2011 Peter Flanigan. All rights reserved

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See perlartistic

This program is distributed in the hope that it will be useful, but WITHOUT WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE