#!/usr/bin/perl 

use LWP::Simple;
use Storable qw(thaw);
use Data::Dumper; # only for debug
my $url = "http://example.com/storable-test2.cgi";
my $content = get $url;
die "could not get $url" unless defined $content;

my $table_clone;
#my %table_clone = %{ thaw($content) };
$table_clone = %{ thaw($content) };
sleep 1;
print Dumper(@$table_clone);
sleep 1;