Select Code to Download

#!/usr/bin/perl

...
line : x  $test=Simple->hash_init(Name=>'Vishi', Id=>1049,Team=>'OpenS
+ource');
  print Dumper $test;