sub task_id() {

        my $latest_task = $client->call('system.listSystemEvents', $session, 1000010047);

        my @list = ();

        foreach my $task (@$latest_task) {

                push (@list, $task->{'id'});

        }

        print Dumper($latest_task);

        return $list[-1];

}




          {
            'pickup_date' => bless( do{\(my $o = '20130124T09:17:43')}, 'Frontier::RPC2::DateTime::ISO8601' ),
            'action_type' => 'Package Install',
            'completion_time' => '2013-01-24 09:18:19.689742',
            'id' => '427',
            'successful_count' => '1',
            'modified_date' => bless( do{\(my $o = '20130124T09:18:19')}, 'Frontier::RPC2::DateTime::ISO8601' ),
            'result_msg' => 'Update Succeeded',
            'version' => '2',
            'name' => 'Package Install',
            'failed_count' => '0',
            'created_date' => bless( do{\(my $o = '20130124T09:16:42')}, 'Frontier::RPC2::DateTime::ISO8601' ),
            'completed_date' => bless( do{\(my $o = '20130124T09:18:19')}, 'Frontier::RPC2::DateTime::ISO8601' ),
            'archived' => '0',
            'modified' => '2013-01-24 09:18:19.689742',
            'created' => '2013-01-24 09:16:42.923179',
            'additional_info' => [
                                 {
                                   'detail' => 'aspell-en-6.0-3:50'
                                 },
                                 {
                                   'detail' => 'autofs-5.0.1-0.rc2.177.el5:1'
                                 },
                                 {
                                   'detail' => 'busybox-1.2.0-14.el5:1'
                                 },
                                 {
                                   'detail' => 'crash-5.1.8-2.el5_9'
                                 },
                                 {
                                   'detail' => 'file-4.17-28'
                                 },
                                 {
                                   'detail' => 'httpd-2.2.3-76.el5_9'
                                 },
                                 {
                                   'detail' => 'iproute-2.6.18-15.el5'
                                 },
                                 {
                                   'detail' => 'kernel-2.6.18-348.1.1.el5'
                                 },
                                 {
                                   'detail' => 'kernel-devel-2.6.18-348.1.1.el5'
                                 },
                                 {
                                   'detail' => 'parted-1.8.1-30.el5'
                                 },
                                 {
                                   'detail' => 'sudo-1.7.2p1-22.el5'
                                 },
                                 {
                                   'detail' => 'telnet-0.17-41.el5:1'
                                 }
                               ],
            'earliest_action' => '2013-01-24 09:17:42.0',
            'pickup_time' => '2013-01-24 09:17:43.144615',
            'scheduler_user' => 'spaceapi'
          }
        ];