../../Task/Vector-products/Perl