Learning Perl, 6th Editon Code Stores