Here's my interpretation of the info.

my %ServiceType = (
  1   => 'kernel driver',
  2   => 'file system driver',
  4   => 'unknown', # perhaps the unknown values
  8   => 'unknown', # are defined in the MS docs...
  16  => 'own process space',
  32  => 'shared process space',
  64  => 'unknown',
  128 => 'unknown',
  256 => 'interactive process',
);

my %ControlsAccepted = (
  1 => 'accept stop', # The service can process requests to stop.
  2 => 'accept pause/continue', # The service can process requests to 
+pause and resume (continue) from a paused state.
  4 => 'accept shutdown', # The service will receive this message when
+ the OS shuts down.
  8 => 'accept param change', # The service can process changes to the
+ service's configuration without having to stop. This flag is only ap
+plicable on Win2K (and later) platforms.
);

my @types = (272,323); # two example ServiceTypes to check out
for my $type (@types) {
  print "ServiceType: $type ";
  for my $key (keys %ServiceType) {
    print $ServiceType{$key},", " if ($type & $key);
  }
  print "\n";
}

[download]

In reply to Re: Remote NT services by Mr. Muskrat
in thread Remote NT services by blackadder

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.