Select Code to Download

Global symbol "$userid" requires explicit package name at x line 17.
Global symbol "$password" requires explicit package name at x line 18.
...
Global symbol "$resultid" requires explicit package name at x line 80.
Global symbol "$resultdesc" requires explicit package name at x line 8
+1.
Global symbol "$orderid" requires explicit package name at x line 82.

if ($response->{channel}->{error}->{errorid} == "") {
    # ...
    my $resultid = $response->{channel}->{result}->{resultid};\
    # ...
  };