#!/usr/bin/perl
use lib "./modules/";
use Discovery;
use strict;
use warnings;

my $c = Discovery->new();
print $c->GetSources;