Siebel-Srvrmgr

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

         "requires" : {
            "Carp" : "0",
            "Class::Data::Inheritable" : "0.08",
            "Config::IniFiles" : "2.88",
            "Data::Dumper" : "0",
            "DateTime" : "1.26",
            "Encode" : "0",
            "Exporter" : "0",
            "FSA::Rules" : "0.34",
            "Fcntl" : "0",
            "File::BOM" : "0.14",
            "File::Copy" : "0",
            "File::Spec" : "0",
            "File::Temp" : "0.2304",
            "Getopt::Std" : "0",
            "Hash::Util" : "0",
            "IO::Select" : "0",
            "IO::Socket" : "0",
            "IPC::Open3" : "0",
            "List::Util" : "1.42",
            "Log::Log4perl" : "1.41",

META.json  view on Meta::CPAN

            "Moose::Util" : "2.1604",
            "Moose::Util::TypeConstraints" : "2.0402",
            "MooseX::AbstractFactory" : "0.004000",
            "MooseX::FollowPBP" : "0.05",
            "MooseX::Singleton" : "0.29",
            "POSIX" : "0",
            "Scalar::Util" : "0",
            "Scalar::Util::Numeric" : "0.40",
            "Set::Tiny" : "0.04",
            "Storable" : "2.51",
            "String::BOM" : "0.3",
            "Symbol" : "0",
            "Test::Class" : "0.36",
            "Test::Differences" : "0.63",
            "Test::Moose" : "2.1806",
            "Test::Most" : "0.35",
            "Test::Pod" : "1.22",
            "Test::Pod::Coverage" : "1.08",
            "Test::TempDir::Tiny" : "0.016",
            "Try::Tiny" : "0.27",
            "YAML::XS" : "0.62",

META.yml  view on Meta::CPAN

requires:
  Carp: '0'
  Class::Data::Inheritable: '0.08'
  Config::IniFiles: '2.88'
  Data::Dumper: '0'
  DateTime: '1.26'
  Encode: '0'
  Exporter: '0'
  FSA::Rules: '0.34'
  Fcntl: '0'
  File::BOM: '0.14'
  File::Copy: '0'
  File::Spec: '0'
  File::Temp: '0.2304'
  Getopt::Std: '0'
  Hash::Util: '0'
  IO::Select: '0'
  IO::Socket: '0'
  IPC::Open3: '0'
  List::Util: '1.42'
  Log::Log4perl: '1.41'

META.yml  view on Meta::CPAN

  Moose::Util: '2.1604'
  Moose::Util::TypeConstraints: '2.0402'
  MooseX::AbstractFactory: '0.004000'
  MooseX::FollowPBP: '0.05'
  MooseX::Singleton: '0.29'
  POSIX: '0'
  Scalar::Util: '0'
  Scalar::Util::Numeric: '0.40'
  Set::Tiny: '0.04'
  Storable: '2.51'
  String::BOM: '0.3'
  Symbol: '0'
  Test::Class: '0.36'
  Test::Differences: '0.63'
  Test::Moose: '2.1806'
  Test::Most: '0.35'
  Test::Pod: '1.22'
  Test::Pod::Coverage: '1.08'
  Test::TempDir::Tiny: '0.016'
  Try::Tiny: '0.27'
  YAML::XS: '0.62'

Makefile.PL  view on Meta::CPAN

  "PREREQ_PM" => {
    "Carp" => 0,
    "Class::Data::Inheritable" => "0.08",
    "Config::IniFiles" => "2.88",
    "Data::Dumper" => 0,
    "DateTime" => "1.26",
    "Encode" => 0,
    "Exporter" => 0,
    "FSA::Rules" => "0.34",
    "Fcntl" => 0,
    "File::BOM" => "0.14",
    "File::Copy" => 0,
    "File::Spec" => 0,
    "File::Temp" => "0.2304",
    "Getopt::Std" => 0,
    "Hash::Util" => 0,
    "IO::Select" => 0,
    "IO::Socket" => 0,
    "IPC::Open3" => 0,
    "List::Util" => "1.42",
    "Log::Log4perl" => "1.41",

Makefile.PL  view on Meta::CPAN

    "Moose::Util" => "2.1604",
    "Moose::Util::TypeConstraints" => "2.0402",
    "MooseX::AbstractFactory" => "0.004000",
    "MooseX::FollowPBP" => "0.05",
    "MooseX::Singleton" => "0.29",
    "POSIX" => 0,
    "Scalar::Util" => 0,
    "Scalar::Util::Numeric" => "0.40",
    "Set::Tiny" => "0.04",
    "Storable" => "2.51",
    "String::BOM" => "0.3",
    "Symbol" => 0,
    "Test::Class" => "0.36",
    "Test::Differences" => "0.63",
    "Test::Moose" => "2.1806",
    "Test::Most" => "0.35",
    "Test::Pod" => "1.22",
    "Test::Pod::Coverage" => "1.08",
    "Test::TempDir::Tiny" => "0.016",
    "Try::Tiny" => "0.27",
    "YAML::XS" => "0.62",

Makefile.PL  view on Meta::CPAN

  "Class::Data::Inheritable" => "0.08",
  "Config::IniFiles" => "2.88",
  "Cwd" => 0,
  "Data::Dumper" => 0,
  "DateTime" => "1.26",
  "Devel::Gladiator" => "0.07",
  "Encode" => 0,
  "Exporter" => 0,
  "FSA::Rules" => "0.34",
  "Fcntl" => 0,
  "File::BOM" => "0.14",
  "File::Copy" => 0,
  "File::Spec" => 0,
  "File::Temp" => "0.2304",
  "Getopt::Std" => 0,
  "Hash::Util" => 0,
  "IO::Select" => 0,
  "IO::Socket" => 0,
  "IPC::Open3" => 0,
  "List::Util" => "1.42",
  "Log::Log4perl" => "1.41",

Makefile.PL  view on Meta::CPAN

  "MooseX::AbstractFactory" => "0.004000",
  "MooseX::FollowPBP" => "0.05",
  "MooseX::Singleton" => "0.29",
  "POSIX" => 0,
  "Regexp::Common" => "2016060801",
  "Regexp::Common::time" => "0.07",
  "Scalar::Util" => 0,
  "Scalar::Util::Numeric" => "0.40",
  "Set::Tiny" => "0.04",
  "Storable" => "2.51",
  "String::BOM" => "0.3",
  "Symbol" => 0,
  "Test::Class" => "0.36",
  "Test::Differences" => "0.63",
  "Test::Moose" => "2.1806",
  "Test::More" => 0,
  "Test::Most" => "0.35",
  "Test::Output" => "1.03",
  "Test::Perl::Critic" => "1.03",
  "Test::Pod" => "1.22",
  "Test::Pod::Coverage" => "1.08",

lib/Siebel/Srvrmgr/Daemon/Light.pm  view on Meta::CPAN

=cut

use Moose 2.0401;
use namespace::autoclean 0.13;
use Siebel::Srvrmgr::Daemon::ActionFactory;
use Siebel::Srvrmgr::Daemon::Command;
use Carp qw(longmess);
use File::Temp 0.2304 qw(:POSIX);
use Data::Dumper;
use Siebel::Srvrmgr;
use File::BOM 0.14 qw(:all);
use Siebel::Srvrmgr::IPC qw(check_system);
use Try::Tiny 0.27;
our $VERSION = '0.29'; # VERSION

extends 'Siebel::Srvrmgr::Daemon';
with 'Siebel::Srvrmgr::Daemon::Cleanup';
with 'Siebel::Srvrmgr::Daemon::Connection';

=pod

lib/Siebel/Srvrmgr/Daemon/Offline.pm  view on Meta::CPAN


=cut

use Moose 2.0401;
use namespace::autoclean 0.13;
use Siebel::Srvrmgr::Daemon::ActionFactory;
use Carp qw(longmess);
use File::Temp 0.2304 qw(:POSIX);
use Data::Dumper;
use Siebel::Srvrmgr;
use File::BOM 0.14 qw(:all);
use Try::Tiny 0.27;

our $VERSION = '0.29'; # VERSION

extends 'Siebel::Srvrmgr::Daemon';
with 'Siebel::Srvrmgr::Daemon::Cleanup';

=pod

=head1 ATTRIBUTES

lib/Siebel/Srvrmgr/ListParser.pm  view on Meta::CPAN

=cut

use Moose;
use Siebel::Srvrmgr::ListParser::OutputFactory;
use Siebel::Srvrmgr::ListParser::Buffer;
use Siebel::Srvrmgr;
use Siebel::Srvrmgr::ListParser::FSA;
use namespace::autoclean 0.13;
use Carp;
use Siebel::Srvrmgr::Types;
use String::BOM 0.3 qw(string_has_bom strip_bom_from_string);

our $VERSION = '0.29'; # VERSION

=pod

=head1 DESCRIPTION

Siebel::Srvrmgr::ListParser is a state machine parser created to parse output of "list" commands executed through C<srvrmgr> program.

The parser can identify different types of commands and their outputs from a buffer given as parameter to the module. For each 

lib/Siebel/Srvrmgr/Log/Enterprise.pm  view on Meta::CPAN

package Siebel::Srvrmgr::Log::Enterprise;

use Moose 2.0401;
use namespace::autoclean 0.13;
use File::Copy;
use File::Temp qw(tempfile);
use Carp qw(cluck confess);
use String::BOM 0.3 qw(strip_bom_from_string);
our $VERSION = '0.29'; # VERSION

=pod

=head1 NAME

Siebel::Srvrmgr::Log::Enterprise - module to read a Siebel Enterprise log file

=head1 SYNOPSIS

lib/Siebel/Srvrmgr/Log/Enterprise.pm  view on Meta::CPAN


has filename => (
    is     => 'ro',
    isa    => 'Str',
    reader => 'get_filename',
    writer => '_set_filename'
);

=head2 header

The header of the Siebel Enterprise log file, without the BOM.

=cut

has header => (
    is      => 'ro',
    isa     => 'Str',
    reader  => 'get_header',
    writer  => '_set_header',
    trigger => \&_check_header
);

lib/Siebel/Srvrmgr/Log/Enterprise.pm  view on Meta::CPAN

# over and use seek to go back to the beginning of the file
    my ( $fh, $filename ) = tempfile($template);
    close($fh);
    copy( $self->get_path(), $filename );

    open( $fh, '<:encoding(utf8)', $filename )
      or die "Cannot read $filename: $!";
    $self->_set_filename($filename);
    my $header = <$fh>;

    # remove BOM, see https://rt.cpan.org/Public/Bug/Display.html?id=101175
    $header = strip_bom_from_string($header);
    $header =~ s/^\x{feff}//;

    # don't know which EOL is available
    $header =~ tr/\012//d;
    $header =~ tr/\015//d;

    $self->_set_fh($fh);

    $self->_set_header($header);

lib/Siebel/Srvrmgr/Regexes.pm  view on Meta::CPAN

}

=pod

=head2 CONN_GREET

Regular expression to match the first line submitted by a Siebel enterprise when the C<srvrmgr> connects to it. It will look like something like this:

    Siebel Enterprise Applications Siebel Server Manager, Version 8.0.0.7 [20426] LANG_INDEPENDENT

It is a known issue that UTF-8 data with BOM character will cause this regular expression to B<not> match.

=cut

sub CONN_GREET {
    return
qr/^Siebel\sEnterprise\sApplications\sSiebel\sServer\sManager\,\sVersion.*/;
}

=pod

t/Test/Siebel/Srvrmgr/Fixtures.pm  view on Meta::CPAN

package Test::Siebel::Srvrmgr::Fixtures;

use warnings;
use strict;
use Scalar::Util::Numeric qw(isint);
use Exporter 'import';
use String::BOM qw(string_has_bom strip_bom_from_string);
use Carp;
use Test::More;    # for note() use
use Siebel::Srvrmgr::ListParser::Output::ListComp::Comp;
use Scalar::Util qw(blessed);
use DateTime 1.26;

our @EXPORT_OK = qw(create_ent_log data_from_file create_comp);

sub create_comp {
    my ( $start, $end );



( run in 0.461 second using v1.01-cache-2.11-cpan-131fc08a04b )