$blob =~ s/^\$VAR\d+\s*=//;
$obj = eval( $blob ) or die $@;