Subversion Repositories VORC

Rev

Rev 208 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 208 Rev 235
Line 22... Line 22...
22 
  print "Adding $classid to $accountid...";
 22 
  print "Adding $classid to $accountid...";
23 
  my $client = REST::Client->new();
 23 
  my $client = REST::Client->new();
24 
  $client->setHost('https://core.wrstbnd.io');
 24 
  $client->setHost('https://core.wrstbnd.io');
Line 25... Line 25...
25 
 
 25 
 
26 
  my $body = {
 26 
  my $body = {
27 
    "eventId"      => "event_Y5567UWwS5",
 27 
    "eventId"      => "event_893C6u5olU",
28 
    "activeStatus" => "active",
 28 
    "activeStatus" => "active",
29 
    "ticketTypeId" => $classid
 29 
    "ticketTypeId" => $classid
30 
  };
 30 
  };