open(RUN, "/usr/local/bin/ticket @ABC|");
       while($line = <RUN>) {
          print "$line";
       }
close(RUN);