Select Code to Download

Dumping$VAR1 = {
          'data' => [
...
                        'ID' => 33,
                        'State' => 'Stopped'
                      }

foreach my $value (sort keys $states->{data}) {
        if ($value == 15) {
...
        print "CurrentState; [$CurrentState]\n";
    }    
    }