view release on metacpan or  search on metacpan

eg/sample.pl  view on Meta::CPAN

#!/usr/bin/env perl

use strict;
use warnings;

use FindBin;
use lib ("$FindBin::Bin/../lib");
use Acme::Math::PerfectChristmasTree qw/calc_perfect_christmas_tree/;

my %perfect_tree = calc_perfect_christmas_tree(140);

print $perfect_tree{'star_or_fairy_height'};