Vba Return Value From Subroutine Perl