- Perl Script: Passing Array by Reference to Function