#!/usr/bin/perl use strict; my @out = `cd /test/repo; git commit -m 'msg' 2>&1`; print "Content-type: text/plain\n\n"; print "@out\n";