#!/usr/bin/perl

use Devel::Size 'total_size';

my %struct = ("key1" => ["bill","ben"],
             "key2" => ["dave","jen"]);

print "total size of %struct - ", total_size(\%struct),"\n";


##</code><code>##

#update last viewed timestamp  
     $info{$key_prev}{'timestamp'} = time;

##</code><code>##

if(defined $info{$key_prev}){
   #update last viewed timestamp  
     $info{$key_prev}{'timestamp'} = time;