How to read this array?

[Jerry Preston]

I have this array and I am trying to figure out how to read $id  in it.  Any
ideas?

@history = (
  {
    program => 'racer',
    version => '0.45',
    input => {
      '/home/' => undef,
    },
    input_contents => '
      $name    = \'Jerry\';
      $id      = \'035\';
      1;
    ',
    perl => {
      location => '/home/',
      version => 5.00502
    }
  }
);

Thanks,

Jerry