Simple perl graph from a batch job log