#!/usr/bin/perl -w

use lib 'modules';
use plugin;
use strict;

my $pluginobj = plugin->new;

my %plugins = $pluginobj->PluginGetFromDir( 'plugins', '2' );

for (keys %plugins ){
    print $plugins{$_}->{name}," ";
    print $plugins{$_}->{version},"\n";
    my $func = $plugins{$_}->{functions};
    for ( @{ $plugins{$_}->{functions} } ){ print $_, ", " }
    print "\n \n";
}