my $rownum = 1;
while ( my $data = somehow_parse_input_line() ) {
	print ",\n" unless $rownum==1;
	print $data;
}
continue { $rownum++ }
print ";\n";