#!/usr/bin/perl
use strict;
use warnings;

use Data::Dumper;
use lib 'Stock/';
use MetalData;

my $md = new MetalData(-metals => 'ag,au,pt');
print Dumper $md->get_metal_data();