Add test script for Perl's array and hash

Array           ()
Hash            ()
Array ref       []
Hash ref        {}