Help for this page

Select Code to Download


  1. or download this
    my $Record = {};
$Record->{designation}
= "Manager"; #d0
...

$Record->{personal}[2]
 = "language"; #d1
  2. or download this
    use Data::Diver qw/ DiveVal /;
my $Record = {};
...
   ],
   "name" : "Harsha"
}
  3. or download this
    my $Record = {
  designation => "Manager",
  name => "Harsha",
  personal => ["Country", "location", "language"],
};