Status: <status>
<command output>
-
+
This allows the caller to determine if the command execution was successful as
well as capture the commands output.
$self->_debug ("Status: $status");
} # if
- print $client "$_\n" foreach (@output);
+ print $client "$_\n" for (@output);
print $client "Clearexec Status: $status\n";
$self->_debug ("Looping around for next command");
while () {
$client = $self->{socket}->accept;
-
+
if ($? == -1) {\r
if ($!{EINTR}) {
next;
=head2 ClearSCM Perl Modules
-=begin man
+=begin man
DateUtils
Display