use strict; use warnings; use 5.010; use Phrase; my $phr1 = Phrase->new(); $phr1->quantities("qty", 1); say $phr1->total_quant; $phr1->quantities("qtySum", 5); say $phr1->total_quant; $phr1->quantities("qtyCont", 8); say $phr1->total_quant; --output:-- 1 6 14