%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : C:/xampp/perl/vendor/lib/B/Hooks/OP/Check/Install/
Upload File :
Create Path :
Current File : C:/xampp/perl/vendor/lib/B/Hooks/OP/Check/Install/Files.pm

package B::Hooks::OP::Check::Install::Files;

$self = {
          'deps' => [],
          'inc' => '',
          'libs' => '',
          'typemaps' => []
        };

@deps = @{ $self->{deps} };
@typemaps = @{ $self->{typemaps} };
$libs = $self->{libs};
$inc = $self->{inc};

	$CORE = undef;
	foreach (@INC) {
		if ( -f $_ . "/B/Hooks/OP/Check/Install/Files.pm") {
			$CORE = $_ . "/B/Hooks/OP/Check/Install/";
			last;
		}
	}

	sub deps { @{ $self->{deps} }; }

	sub Inline {
		my ($class, $lang) = @_;
		if ($lang ne 'C') {
			warn "Warning: Inline hints not available for $lang language
";
			return;
		}
		+{ map { (uc($_) => $self->{$_}) } qw(inc libs typemaps) };
	}

1;

Zerion Mini Shell 1.0