View on
MetaCPAN is shutting down
For details read Perl NOC. After June 25th this page will redirect to
Konstantin Stepanov > FusqlFS-0.007 > FusqlFS::Backend::PgSQL::Role::Owner



Annotate this POD

View/Report Bugs
Source   Latest Release: FusqlFS-0.009


FusqlFS::Backend::PgSQL::Role::Owner - FusqlFS class to expose PostgreSQL artifact's owner


    package FusqlFS::Backend::PgSQL::Tables;
    use parent 'FusqlFS::Artifact';

    use FusqlFS::Backend::PgSQL::Role::Owner;

    sub init
        my $self = shift;

        # initialize class

        $self->{owner} = FusqlFS::Backend::PgSQL::Role::Owner->new('r');

    sub get
        my $self = shift;
        my ($name) = @_;
        my $result = {};

        # load structures into $result

        $result->{owner} = $self->{owner};
        return $result;


This class exposes PostgreSQL artifact's owner as a symlink to role in /roles directory. It is best used with plugged in FusqlFS::Backend::PgSQL::Roles module (see FusqlFS::Backend::Base for more info on plugging in different modules).

The class's new constructor accepts single char argument designating type of artifact the owner of which is to be exposed. Possible values of this argument can be seen in FusqlFS::Backend::PgSQL::Role::Base module.

syntax highlighting: