Select Code to Download

%calls = &call_type( $d, $d );

...
    }
    return %calls;
}

$VAR1 = {
          '20080110:Dedicated' => [
...
                                                '-506.034400'
                                              ]
        };