Vba Return Value From Subroutine In Perl