Platon Technologies
not logged in Login Registration
EnglishSlovak
open source software development celebrating 10 years of open source development! Sunday, September 15, 2019

File: [Platon] / perl-modules / Platon.pm (download)

Revision 1.1, Thu Oct 21 17:35:02 2004 UTC (14 years, 10 months ago) by rajo

Core Platon SDG Perl module

#
# Platon.pm - General Platon SDG perl module
#
# Developed by Lubomir Host 'rajo' <rajo AT platon.sk>
# Copyright (c) 2004 Platon SDG, http://platon.sk/
# Licensed under terms of GNU General Public License.
# All rights reserved.
#
# Changelog:
# 2004-10-15 - created
#

# $Platon$

package Platon;

use strict;

use vars qw($VERSION $DEBUG);

$VERSION = sprintf("%d.%02d", q$Revision: 1.1 $ =~ /(\d+)\.(\d+)/);
$DEBUG   = 0 unless defined $DEBUG;

sub new
{ #{{{
    my $this  = shift;
    my $class = ref($this) || $this;
    my $self  = { };

    bless $self, $class;

    return $self;
} # }}}

sub version($;)
{ # {{{
    my ($self) = @_;

    return $VERSION;

} # }}}

1;

__END__

=head1 NAME

Log - <<<description of module>>>

=head1 SYNOPSIS

  use Log;

  my $xxx = new Log;

=head1 DESCRIPTION

The Log module allows you ...
<<<your description here>>>

=head2 EXPORT

<<here describe exported methods>>>

=head1 SEE ALSO

=head1 AUTHORS

Lubomir Host 'rajo', <rajo AT platon.sk>

=cut

# vim: ts=4
# vim600: fdm=marker fdl=0 fdc=3


Platon Group <platon@platon.org> http://platon.org/
Copyright © 2002-2006 Platon Group
Site powered by Metafox CMS
Go to Top