progress on perl client