Push Syntax In Perl