view release on metacpan or  search on metacpan

t/micro-test.pl  view on Meta::CPAN

#!/usr/bin/perl -X

use strict;
use warnings;
use AI::MicroStructure;
use Data::Printer;
use Data::Dumper;

my $h = AI::MicroStructure->new( 'germany', category => 'Dresden' );
my $h =  Dumper  $h->name();
p $h;



1;