01 namespace perl image_process
02 
03 struct Rotation {
04     1: i32    angle,
05     2: string image,
06 }
07 
08 exception Failed {
09     1: string why
10 }
11 
12 service Rotator {
13     string rotate( 1:Rotation r) 
14       throws ( 1:Failed oops )
15 }