Michael Schilli > Perl-Installed > Perl::Installed

Download:
Perl-Installed-0.01.tar.gz

Dependencies

Annotate this POD

View/Report Bugs
Module Version: 0.01   Source  

NAME ^

Perl::Installed - Get meta information of a perl installation

SYNOPSIS ^

    use Perl::Installed;

    my $perl = Perl::Installed->new( prefix => "/usr/local" );

        # Retrieve all files and symlinks
    my @files = $perl->files();

        # Retrieve configuration parameters
    my $cfg = $perl->config();
    print "$cfg->{version} on $cfg->{osname}\n";

DESCRIPTION ^

When you point Perl::Installed to a perl installation by telling it the prefix (e.g. "/usr" or "/usr/local"), it will provide meta data, like the files the installation consists of or the $Config hash it uses.

This way, you can bundle up perl installations for package management systems like Redhat's RPM or Debian's dpkg. Note that the perl installation you're using to perform the bundling isn't necessarily identical with the perl installation you're bundling up.

METHODS ^

new( prefix => "..." )

Constructor, takes the prefix of the perl installation as a mandatory parameter. Usually the prefix of a perl installation is either "/usr" (perl therefore being at /usr/bin/perl) or "/usr/local".

files()

Looks at the installation's .packlist and returns the files therein. It returns a reference to an array with an element for each file/symlink. Every array element is a reference to a hash with the following entries:

    path - Path to the file/symlink
    type - "file" or "link"
    from - If 'path' is a symlink, this entry tells where it's pointing
           to (usually where the corresponding file is).

Example:

    my @files = $perl->files();

    for my $file (@files) {

        if( $file->{type} eq "file" ) {
            print "File: $file->{path}\n";
        } elsif( $file->{type} eq "link" ) {
            print "Link: $file->{path} -> $file->{from}\n";
        }
    }
config()

Returns a reference to the perl installation's $Config hash, just as if you had said use Config and used %Config afterwards. Note that the perl installation you're using to perform the bundling isn't necessarily identical with the perl installation you're bundling up, so it will

packlistfile()

Return the path to the packlist file of the perl core.

LEGALESE ^

Copyright 2007 by Mike Schilli, all rights reserved. This program is free software, you can redistribute it and/or modify it under the same terms as Perl itself.

AUTHOR ^

2007, Mike Schilli <m@perlmeister.com>

syntax highlighting: