my (%ticker, %portfolio);
my @stock_names = ('Derpco', 'Tetrabytz', 'Mojo Inc', 'Freke', 'Mega');
@portfolio{@stock_names} = (0) x @stock_names;
@ticker{@stock_names} =
        map {   price       => generate_random(10, 100),
                volitility  => int(rand(7)) * 5 + 5 }, @stock_names;