Select Code to Download

  1 package toy_module;
  2 
...
 20 }
 21 
 22 1;

  1 use strict;
  2 use warnings;
...
 14 
 15 my $test_object = toy_module->new({simple_hash=>$little_test_hash_
+ref, simple_test_scalar=>5});
 16 my $next_test = $test_object->show_simple_hash;

MacBook-Pro:toys mcrepeau$ perl test_toy_module.pl 
Using a hash as a reference is deprecated at toy_module.pm line 11.
...
********** INSIDE SUBROUTINE NEW **********
simple scalar: 5
Type of argument to keys on reference must be unblessed hashref or arr
+ayref at toy_module.pm line 11.