SHIGETA / WebService-FogBugz-0.0.4 / example / requests.pl 

            

              
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125

              
#!/usr/bin/perl
use strict;
use warnings;
use WebService::FogBugz;
use Data::Dumper;
my $fogbugz = WebService::FogBugz->new({
    email => 'youremail@example.com',
    password => 'password',
    base_url => 'http://www.example.com/fogbugz/api.asp'
});
$fogbugz->logon;
###########################################
## Filters
# listFilters
#print $fogbugz->request_method('listFilters');
# saveFilter
###########################################
## Listing Cases
# search
my $res =  $fogbugz->request_method('search', {
    q => 'WebService',
});
print $res;
###########################################
## Editing Cases
# new
# edit
# assign
# reactivate
# reopen
# resolve
# close
# email
# reply
# forward
###########################################
## Lists
# listProjects
# listAreas
# listCategories
# listPriorities
# listPeople
# listStatuses
# listFixFors
# listMailBoxes
###########################################
## Views
# viewProject
# viewArea
# viewCategory
# viewPriority
# viewPerson
# viewStatus
# viewFixFor
# viewMainBox
###########################################
## Working Schedule
# listWorkingSchedule
# wsDateFromHours
###########################################
## Time Tracking
# startWork
# stopWork
# newInterval
# listIntervals
###########################################
## Source Control
# newCheckin
#$fogbugz->request_method('newCheckin', {
#    ixBug => 9999,
#    sFile => 'repos/trunk/Example.pm',
#    sNew  => 10,
#    sPrev => 9,
#    sRepo => '',
#});
# listCheckins
#$fogbugz->request_method('listCheckins', {ixBug => 9999});
###########################################
## Release Notes
#$fogbugz->request_method('search', {
#    q=fixfor:undecided
#    cols=ixBug,sCategory,sTitle,sReleaseNotes
#});
###########################################
## Discussion Groups
# listDiscussGroups
# listDiscussion
# listDiscussTopic
###########################################
## BugzScout
# listScoutCase
###########################################
## Subscriptions
# subscribe
# unsubscribe
###########################################
## Mark as viewed
# view
###########################################
## Settings
# viewSettings
$fogbugz->logoff;