#!/usr/bin/perl

package tools;

@ISA = qw( _Initialize );

sub _init
{
	my ($self, %args) = @_;
	$self->{_name}	= $args{name};
	$self->{_alias}	= $args{moniker};
	$self->{_langs}	= $args{languages};
}

1;