$data = sprintf('%-30s,%-30s,%-30s", foo, bar, baz); print $data, "\n";