Help for this page

Select Code to Download


  1. or download this
        my %shared_data = (
            'dtLastRcvMsg' =>  time,
...
    my $p1 = \%shared_data;
    mylog( "P1: ($p1) " . Dumper( $p1 ));
  2. or download this
    
    $self->{'shared_data'} = $p1;
...
    my $p2 = $self->{'shared_data'};
    mylog( "P2: ($p2)" . Dumper( $p2 ));